Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/73.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
在R中:组合不同数据帧的列_R_For Loop_Multiple Columns - Fatal编程技术网

在R中:组合不同数据帧的列

在R中:组合不同数据帧的列,r,for-loop,multiple-columns,R,For Loop,Multiple Columns,我尝试组合三个不同数据帧的每一列,以获得一个与原始数据帧长度相同的对象以及每个子对象的三列。每个原始数据帧有10列14行。 我尝试了一个for循环,但是结果对我来说不可用 t <- NULL for(i in 1 : length(net)) { a <- cbind(imp.qua.00.09[i], exp.qua.00.09[i], net[i]) t <- list(t, a) } t t这应该有效: do.call(cbind,list(imp.

我尝试组合三个不同数据帧的每一列,以获得一个与原始数据帧长度相同的对象以及每个子对象的三列。每个原始数据帧有10列14行。 我尝试了一个for循环,但是结果对我来说不可用

t <- NULL
for(i in 1 : length(net)) { 
    a <- cbind(imp.qua.00.09[i], exp.qua.00.09[i], net[i])
    t <- list(t, a) 
}
t
t这应该有效:

do.call(cbind,list(imp.qua.00.09, exp.qua.00.09, net))

您用来将元素附加到
t
的代码是错误的,您应该这样做:

t <- list()
for(i in 1:length(net)) { 
  a <- cbind(imp.qua.00.09[i], exp.qua.00.09[i], net[i])
  t[[length(t)+1]] <- a
}
t
t <- list()
for(i in 1:length(net)) { 
  a <- cbind(imp.qua.00.09[i], exp.qua.00.09[i], net[i])
  t[[length(t)+1]] <- a
}
t
t <- lapply(1:length(net),
            function(i){cbind(imp.qua.00.09[i], exp.qua.00.09[i], net[i])})