for文でデータフレームごとに列名を変えたい

Question

for文でデータフレームをいくつか作っています。

for (i in 1:10) {
  assign(paste("iris",i,sep=""),data.frame(X=iris[,1],Y=iris[,2]))
}

このとき列名をデータフレームごとに変えたいです。
iris1のときはX, Y1
iris2のときはX, Y2
といった具合です。

失敗例１

for (i in 1:10) {
  assign(paste("iris",i,sep=""),data.frame(X=iris[,1],paste("Y",i,sep="")=iris[,2]))
}

失敗例２

for (i in 1:10) {
  assign(paste("iris",i,sep=""),data.frame(X=iris[,1],Y=iris[,2]))
  colnames(get(paste("iris",i,sep="")))<- c("X", paste("Y",i,sep=""))
}

どのように改善すればよいでしょうか。

Answer 1

for (i in 1:10) {
  eval(parse(text = paste("iris", i, "= data.frame(X = iris[, 1], Y", i, "=iris[,2])", sep = "")))
}

こんな感じですかね。

Comments

[shimiken]

ありがとうございます！！！