powered by
makeprobsvec(p)
p<-sample(1:5000,20) makeprobsvec(p)
Run the code above in your browser using DataLab