X.grid <- parameterSets(par.ranges=list(V1=c(1,1000),V2=c(1,4)),
samples=c(10,10),method="grid")
plot(X.grid)
X.innergrid<-parameterSets(par.ranges=list(V1=c(1,1000),V2=c(1,4)),
samples=c(10,10),method="innergrid")
points(X.innergrid,col="red")
library(randtoolbox)
X.sobol<-parameterSets(par.ranges=list(V1=c(1,1000),V2=c(1,4)),
samples=100,method="sobol")
plot(X.sobol)
Run the code above in your browser using DataLab