r - 现有函数来组合 R 中的标准偏差？

Question

我有 4 个均值和标准差已知的总体。我想知道大均值和大标准差。大均值显然很容易计算，但 R 有一个方便的效用函数，weighted.mean()。是否存在用于组合标准偏差的类似函数？

The calculation is not complicated ，但现有的函数将使我的代码更清晰、更易于理解。

额外的问题，您使用什么工具来搜索这样的功能？我知道它一定在那里，但我已经做了很多搜索，但找不到它。谢谢!

Answer 1

我不知道特定的包或函数名称，但从 Wikipedia 页面推出您自己的函数似乎很容易。假设种群没有重叠:

## N: vector of sizes
## M: vector of means
## S: vector of standard deviations

grand.mean <- function(M, N) {weighted.mean(M, N)}
grand.sd   <- function(S, M, N) {sqrt(weighted.mean(S^2 + M^2, N) -
                                      weighted.mean(M, N)^2)}