Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/83.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

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/9/loops/2.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
for循环中的R和_R_Loops_Sum - Fatal编程技术网

for循环中的R和

for循环中的R和,r,loops,sum,R,Loops,Sum,我会尽量这样说: 我在总结: tot <- fac$a[,1]+fac$b[,1] 其中a和b为系数,1为第一列。在这里之前一切都很好 现在我想使用for循环来对所有列进行求和: tot <- 0 for (i in 5:13) { tot[,i] <- fac$a[,i]+fac$b[,i] } 这是行不通的 有什么建议吗? 谢谢。我只能猜到你的问题。您忘记了错误消息。 IMHO它不起作用,因为tot属于numeric类,没有矩阵,没有列,也没有任何行可以通过索引i访

我会尽量这样说:

我在总结:

tot <- fac$a[,1]+fac$b[,1]
其中a和b为系数,1为第一列。在这里之前一切都很好

现在我想使用for循环来对所有列进行求和:

tot <- 0 
for (i in 5:13) {
tot[,i] <- fac$a[,i]+fac$b[,i] 
}
这是行不通的

有什么建议吗?
谢谢。

我只能猜到你的问题。您忘记了错误消息。 IMHO它不起作用,因为tot属于numeric类,没有矩阵,没有列,也没有任何行可以通过索引i访问


要修复您的代码:tot@ttmaccer这是非常巨大的。我想一行一行地对每一列进行求和,并通过这样做创建一个新的矩阵。请在将来使您的问题更具可复制性。例如,fac的结构是什么?你犯了什么错误?你希望得到什么?如果你仔细思考你的问题,你会得到无限好的答案。非常感谢,你完全明白我的意思。谢谢你的建议。
a <- matrix(10, ncol=13, nrow=10)
b <- matrix(20, ncol=13, nrow=10)

tot <- a[, 5:13] + b[, 5:13]