如何用循环给变量赋上标签

ahhhh

各位前辈好：

假设有 c1 c2 c3 ... c100 这些 data.frame，每个变量有两列数据，如何用循环给这些变量赋上列标签("subject1"，"subject2")。我运行以下代码但总是报错：

t1 <- paste("c", 1:100, sep="")

for (t in t1) {

assign(t, data.frame(V1=1, V2=2))

names(get(t)) <- c("subject1", "subject2")

}

superdesolator

回复第1楼的 ahhhh：问题应该出在names(get(t))这里,我觉得,get(t)得到的东西应该如同print(),是一个右值,只能读不能写,这个问题我也不知道怎么处理,最简单的办法就是assign(t, data.frame(subject=1,subject=2))直接弄好,另外一个办法在我们注意到如果可以names(c1)而不是names(get(t1[1]))就可以对names(c1)进行赋值,关键在于如果从一个表达式"c1"得到c1...感觉好难，前面是字符串，后面是变量。。

nuomin

tt<-paste("names(",t,")<-c('subject1','subject2')")

eval(parse(text=tt))

用get(t)错了

ahhhh

谢谢两位，照着 nuomin 的方法试验成功，谢谢 nuomin。