R语言中实现方差和标准差

本文转载自查看原文 2021-10-29 23:09 206 R语言

1、

a <- c(1, 3, 4, 7, 9)

sum_a = 0
for (i in 1:length(a)) {
  sum_a = sum_a + a[i] 
  }
mean_a = sum_a / length(a)

va = 0
for (i in 1:length(a)) {
  va = va + (a[i] - mean_a) * (a[i] - mean_a)
}

s2 = va / (length(a) - 1)
sda = sqrt(s2) 
s2
var(a)

sda
sd(a)

免责声明！

本站转载的文章为个人学习借鉴使用，本站对版权不负任何法律责任。如果侵犯了您的隐私权益，请联系本站邮箱yoyou2525@163.com删除。