# NOT RUN {
set.seed(0)
X1 <- matrix(rnorm(50,mean=2,sd=5))
svplot2(X1)
X2 <- matrix(rf(50,df1=10,df2=5))
svplot2(X2)
X3 <- matrix(rbeta(50,shape1=10,shape2=2))
svplot2(X3,lbcol="blue",lsdcol="blue",rbcol="red",rsdcol="red")
# }
Run the code above in your browser using DataLab