# NOT RUN {
## generate three different dataset
X1 = aux.gensamples(dname="swiss")
X2 = aux.gensamples(dname="ribbon")
X3 = aux.gensamples(dname="twinpeaks")
## visually verify : all should have approximate slope of 2.
par(mfrow=c(1,3))
est.boxcount(X1,show=TRUE)
est.boxcount(X2,show=TRUE)
est.boxcount(X3,show=TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab