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