如何应用依赖于 R 中三个变量的 function？

Question

我敢肯定以前有人问过这样的问题。 但我努力寻找答案（甚至清楚地表达这个问题）。

如果我有 2 个变量，我想将 function 应用于每对这些变量，其中 function 取决于第三个变量。 例如，

如果我有一些看起来像这样的数据：

x <- c(1:4)
y <- c(1,2)
n <- seq(1,200, length.out = 100)

现在，假设我想将rnorm应用于每对x和y ，其中y是我的平均值， x是标准差。 但是我想遍历这些对中的每一对，其中n的每个值都是我的观察次数。

例如，我正在尝试一个嵌套循环......下面的例子不起作用，但我希望它说明了我试图实现的目标：

for(i in 1:2){
  for(j in 1:4){
    for(k in 1:length(n)){
    ans[] <- rnorm(n[k], y[i], x[j])
    }
  }
}

关于我如何实现这一目标的任何建议？

Answer 1

使用 expand.grid

z = expand.grid(n,x,y)
apply(z, 1, function(i) rnorm(i[1], i[2], i[3]))