ポテトの長さの平均は

ハンバーガー統計学をRで解いてみました。
http://kogolab.chillout.jp/elearn/hamburger/chap1/sec1.html

ポテトの長さの平均を計算する

ワクワクバーガーのポテトの長さの平均

まずはワクワクバーガーのポテトの長さから。

waq2_potato_length

>waq2 <- read.delim("waq2_potato_length.csv",sep=",", stringsAsFactors=FALSE, header=FALSE, na.strings="")
>mean(waq2$V1)
[1] 4.571429

ワクワクバーガーのポテトの長さ（49本分）
https://drive.google.com/file/d/0B4lJ1IyMUew0OE9CVGhTam0wdzQ/view?usp=sharing

モグモグバーガーのポテトの長さの平均

次にモグモグバーガーのポテトの長さから。

mog2_potato_length

> mog2 <- read.delim("mog2_potato_length.csv",sep=",", stringsAsFactors=FALSE, header=FALSE, na.strings="")
> mean(mog2$V1)
[1] 4.614286

モグモグバーガーのポテトの長さ（49本分）
https://drive.google.com/file/d/0B4lJ1IyMUew0SHZ1STMxNXRfLUE/view?usp=sharing