R语言中不使用公式如何计算SD

In R language, how to calculate SD without using formula

我正在尝试使用公式 shew<-(sum((x-kl)^2))/(t-1) 计算 sd 但结果是错误的。我尝试使用 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)

这不像是一个打字错误的问题,所以我回答了。

你漏掉了一个平方根:sqrt(shew),否则你得到的是样本方差而不是标准误差。