#spatial community ANOSIM correlogram
data(mite)
data(mite.xy)
commcorrelogram(sampleData=mite,sampleLocation=cbind(mite.xy,z=0)
,lagSize=0.3,lagNumber=17,lagTol=0.15,option=1,numTests=5)
## Not run:
# #spatial community Mantel correlogram
# data(mite)
# data(mite.xy)
# commcorrelogram(sampleData=mite,sampleLocation=cbind(mite.xy,z=0)
# ,lagSize=0.3,lagNumber=17,lagTol=0.15,option=1,metric="mantel"
# ,mantmeth="spearman",numTests=9)
#
# #anisotropic community correlograms
# commcorrelogram(sampleData=mite,sampleLocation=cbind(mite.xy,z=0)
# ,lagSize=0.3,lagNumber=8,lagTol=0.15,option=1,anisotropic=TRUE
# ,azimuth=0,azimuthTol=15,bandwidth=2,numTests=9,dipAngle=0
# ,dipTol=90,dipBandwidth=1)
#
# commcorrelogram(sampleData=mite,sampleLocation=cbind(mite.xy,z=0)
# ,lagSize=0.5,lagNumber=10,lagTol=0.25,option=1,anisotropic=TRUE
# ,azimuth=90,azimuthTol=15,bandwidth=2,numTests=9,dipAngle=0
# ,dipTol=90,dipBandwidth=1)
#
# commcorrelogram(sampleData=mite,sampleLocation=cbind(mite.xy,z=0)
# ,lagSize=0.5,lagNumber=10,lagTol=0.25,option=1,anisotropic=TRUE
# ,azimuth=45,azimuthTol=15,bandwidth=2,numTests=9,dipAngle=0
# ,dipTol=90,dipBandwidth=1)
#
# #temporal community correlogram
# data(pyrifos)
# pyrifos.levels<-data.frame(ditch=gl(12,1,length=132),
# dose=factor(rep(c(0.1, 0, 0, 0.9, 0, 44, 6, 0.1, 44, 0.9, 0, 6),11)),
# week=as.numeric(as.character(gl(11, 12,
# labels=c(-4, -1, 0.1, 1, 2, 4, 8, 12, 15, 19, 24)))))
# commcorrelogram(sampleData=pyrifos,sampleTime=pyrifos.levels$week,
# option=2,lagSize=3,lagTol=1.5,numTests=9,lagNumber=10)
#
# #temporal community correlogram holding location constant
# commcorrelogram(sampleData=pyrifos,sampleTime=pyrifos.levels$week,
# LocationNames=pyrifos.levels$ditch,option=4,lagSize=3,lagTol=1.5,
# numTests=9,lagNumber=10)
# ## End(Not run)
Run the code above in your browser using DataLab