powered by
rDirichlet(K, alpha = 0.1)
temp <- rDirichlet(4)
Run the code above in your browser using DataLab