x <- slot(AnnHAge, 'data')[ ,3:5]
foldername <- system.file('extdata', package = 'OasisR')
shapename <- 'AnnHAge'
ar <- area(AnnHAge)
distc<- distcenter(AnnHAge, center = 19)
probavector<-ar/sum(ar)
MCTest(x, fun='Duncan', type='rand', nsim=999)
MCTest(x, fun='ACE', type='perm', a = ar , dc=distc)
MCTest(x, fun='Wong', type='area', folder = foldername,
shape = shapename)
MCTest(x, fun='Morill', type='user', proba=probavector,
spatobj = AnnHAge)
Run the code above in your browser using DataLab