example <- coenoflex(numgrd=3,numplt=100,numspc=100,grdtyp=c('e','e','e'),
grdlen=c(300,200,100),width=c(100,75,50),variab=c(20,20,20),
grdprd=c(0,0,0),alphad=c(1,1,1),pdist='r',sdist='r',
skew=3.0,aacorr=0.0,cmpasy=3.0,cmpphy=0.0,maxtot=100,
noise=20,slack=0.2,autlin='irm(1,2,3)')
## Not run: plot(example,which='all')
Run the code above in your browser using DataLab