powered by
rdirichlet(n, alpha)
rbeta
x <- rdirichlet(10, c(1,2,3) )
Run the code above in your browser using DataLab