# NOT RUN {
## Generate samples for three different shapes
d1 = aux.gensamples(dname="twinpeaks",noise=0.01)
d2 = aux.gensamples(dname="ribbon",noise=0.01)
d3 = aux.gensamples(dname="crown", noise=0.01)
# }
# NOT RUN {
casenames = c("swiss","crown","helix","saddle","ribbon","bswiss","cswiss","twinpeaks")
for (i in 1:length(casenames)){
data = aux.gensamples(n=sample(1000:2000,1),noise=runif(1)[1],dname=casenames[i])
}
# }
Run the code above in your browser using DataLab