如何在R中的循环中的数据帧中添加具有变量名的列？

我试图做的是将列添加到数据帧中，但我不想为每一列编写

请考虑这个例子：

for (i in 1:nrow(b){
dataframe$i<-dataframe1[i,2] }

for（1中的i:nrow（b）{
数据帧$i
for（1中的i:nrow（b）{
dataframe[[paste0（“YourString”，i）]]这里的复制列是随机生成的数字。请注意，我指定了创建的矩阵的长度

my_data <- (cbind(round(runif(10, 0,10),1),rep("B",10)))
my_data2 <- as.data.frame(matrix(NA,ncol=10, nrow=10) )
colnames(my_data2) <- (my_data[,1])  
cbind(my_data,my_data2)

my_data我找到了问题编辑部分的答案：添加I[[j]]我建议您阅读《非常感谢您的建议》@DavidArenburg，该建议内容丰富，但不完全是我问题的答案。谢谢@field210，该建议非常有效，这正是我想要的，我还有另一个问题：如果数据框是数据框列表，我也会使用它，但我得到了以下错误：object“结束”类型不可再附加“我编辑问题，请再次查看”感谢您的回答@Jim Button，但前面的答案是我问题的答案
for (i in 1:nrow(b){
dataframe[[paste0("YourString",i)]]<-dataframe1[i,2] }

my_data <- (cbind(round(runif(10, 0,10),1),rep("B",10)))
my_data2 <- as.data.frame(matrix(NA,ncol=10, nrow=10) )
colnames(my_data2) <- (my_data[,1])  
cbind(my_data,my_data2)

I<-list()
for(j in 1:nrow(a)){
I[[j]]<-data.frame()
I[[j]]<-data.frame(d=1,c=2,d=4.01,stringsAsFactors=FALSE)
for (i in 1:nrow(b)){
I[[j]][[paste0("F",i)]]<-dataframe1[i,2]}}