问题描述
我正在尝试对 R 中的标准偏差公式进行硬编码（是的，我知道有一个函数可以做到这一点）。这是我目前所拥有的。
x = c(1,6,2,7,... #shortened for clarity
n = length(x)
xBar <- mean(x)
...
StDev = sqrt((sum(x - xBar)) / (n-1))
这输出零。我在 R 方面的经验较少，但我相信我的问题在于 sum(x - xBar)。如何求所有 x 值的总和减去均值？谢谢！
我不想写一个新函数。
解决方法
暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！
如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@）