计算R个环路输出的平均值

2admgd59 于 2023-02-06 发布在其他

关注(0)|答案(1)|浏览(150)

我需要计算一个R for循环输出的均值。例如：

for (x in 1:3) {
  print(x)
  vector <- c(sample(1:2, 200, replace = TRUE))
  print(vector)
  vmean <- (mean(vector))
  print(vmean)
}

这给我：

\[1\] 1

\[1\] 1.535

\[1\] 2

\[1\] 1.495

\[1\] 3

\[1\] 1.545

如何结合这三个平均值来计算平均值的平均值？

来源：https://stackoverflow.com/questions/75305506/calculate-the-mean-of-r-loop-outputs

1条答案

按热度按时间

ia2d9nvy1#

我们可以创建vmean初始化和连接（或创建特定长度的向量并赋值），以创建means的vector，然后获得means的平均值

vmean <- c()
for (x in 1:3) {
  print(x)
  vector <- c(sample(1:2, 200, replace = TRUE))
  #print(vector)
  vmean <- c(vmean, mean(vector))
  #print(vmean)
}

输出

> vmean
[1] 1.520 1.495 1.460
> mean(vmean)
[1] 1.491667

或者将replicate与colMeans一起使用

vmean <- colMeans(replicate(3, sample(1:2, 200, replace = TRUE)))
vmean
[1] 1.495 1.535 1.575
mean(vmean)

注：由于未设置种子，因此值不同

赞(0）回复(0）举报 2023-02-06

我来回答

计算R个环路输出的平均值

1条答案

相关问题

热门标签

最新问答