［R］分散と標準偏差（「まずはこの一冊から 意味が分かる統計学」（ペレ出版）、pp.27-28）

p.27の観測値をファイルtable_p027.csvに保存しておく。

> dtf <- read.csv("table_p027.csv")
> x <- dtf$x
> n <- length(x)
> m <- mean(x)
> v <- sum((x - m) ^ 2) / n
> s <- sqrt(v)
> cat(sprintf("分散 = %f\n", v))
分散 = 163.700000
> cat(sprintf("標準偏差 = %f\n", s))
標準偏差 = 12.794530