2008-10-31 乱数発生 R Dirichlet bayesmパッケージをダウンロード library(bayesm) help(rdirichlet) set.seed(66) rdirichlet(c(rep(3,5))) sum(rdirichlet(c(rep(3,5)))) [1] 1