将输出对象从R中的for循环存储到数据帧

Question

我想在R中为以下方程式编写脚本，并为每个相应的结果制作数据框。

x<-c(1:5)
y<-c(1:5)
z<-4*(x+2*y)

我需要找到X和Y值的不同组合的每个结果，就像Excel表格式的行/列列表从1到5。如何使用for循环函数来实现。 非常感谢。

Answer 1

您不必使用循环，也可以使用outer

> outer(x, y, FUN=function(x,y){4*(x+2*y)})
     [,1] [,2] [,3] [,4] [,5]
[1,]   12   20   28   36   44
[2,]   16   24   32   40   48
[3,]   20   28   36   44   52
[4,]   24   32   40   48   56
[5,]   28   36   44   52   60

Answer 2

如果你在一个循环这样死心塌地，这里有一个循环的方法来得到相同的结果与outer ：

result_matrix <- matrix(NA, nrow=length(x), ncol=length(y))
for(i in seq(x)) {
for(j in seq(y)) {
    result_matrix[i,j] <- 4*(x[i] + 2*y[j])
}
}