r - R：创建一个while循环来对向量中低于平均值的值求和

Question

我真的可以在这里使用一些帮助，我想要一个 while 循环来计算向量中低于均值的所有值的总和，我还想提取总和中的值的数量，向量如下所示：

x <- 日志（1:200）

提前感谢您的帮助！

Answer 1

创建逻辑向量，指示值是否低于均值：

vec <- x < mean(x)

将以下所有值相加意味着：

sum(x[vec])

下面的计数值意味着：

sum(vec)