# NOT RUN {
# }
# NOT RUN {
# Map the first 100 points of the Sobol' sequence in 3D
# onto the unit ball in 3D
library(randtoolbox)
des <- sobol(100,3)
des_ball <- CtoB(des)
pairs(des_ball,xlim=c(-1,1),ylim=c(-1,1),pch=16)
# }
Run the code above in your browser using DataLab