r - R中的标准偏差

Question

我试图从头开始计算 R 中的标准偏差（我知道 R 有一个内置函数），但我没有得到正确的结果，所以我不知道我做错了什么。

My.SD<-function(X) {
  M<-(sum(X)/length(X))
  my.var<-sum((X-M)^2)
  StanDev<-sqrt(my.var/length(X))
  print(StanDev)
}

标签： r

Answer 1

我猜你可能需要使用(length(X)-1)而不是length(x)，即

My.SD<-function(X) {
  M<-(sum(X)/length(X))
  my.var<-sum((X-M)^2)
  StanDev<-sqrt(my.var/(length(X)-1))
  print(StanDev)
}

因为这里应该是样本标准偏差。