Title asks it all. Thanks in advance, Mark a = 1:5 b1 = 2:6 Z = data.frame(a,b1) Z Z$b1 count = 1 MyName = paste("b",count,sep="") MyName Z$MyName N = as.name(MyName) Z$N