今天刚刚好了解到,看看吧:: for (i in 1:nrow(iris)) eval(parse(text=paste(paste('a',i,sep=''), '= iris[',i,',]$Sepal.Length')))