在R語言中，如何計算SD而不使用公式

Question

我試圖使用公式表示sd < - （sum（（x-kl）^ 2））/（t-1），但結果是錯誤的。我試過使用SD函數來計算sd，結果是不同的。任何人都可以幫忙

IndexStart <- 1 
x <- seq(IndexStart, 6, 1) 
x 
t<-6 
xm <- 1 
kl<-mean(x) 
kl 
n<-sd(x) 
n 
shew<-(sum((x-kl)^2))/(t-1) 

Answer 1

這似乎不是一個錯字問題，所以我回答它。

您錯過了一個平方根：sqrt(shew)，否則您會得到樣本方差而不是標準誤差。