ダメ出し：R で円周率計算（2）

R で円周率計算

mean(runif(points.num)^2+runif(points.num)^2 < 1)*4

だけでよかった。速いし。