一様分布の和の平均は正規分布の近似に使える(中心極限定理)
sum_runif <- function(x) { a <- runif(n = 1000) if (x <= 1) return(a) else return(a + Recall(x-1)) } hist(sum_runif(5)) hist(sum_runif(1)) hist(sum_runif(10))