mod.commcorrelogram automatically fits a Gaussian curve to the significance plot of a commcorrelogram object and calculates the correlation range of the data.mod.commcorrelogram(object,Ch=1,Cc=5,Cw=0.01,plot=T,alpha=0.05,
alternative='one.tailed',pw=5,lgpos='topleft',...)community.correlogram objectCh appropriate for their particular dataset and specify values accordingly.Cc appropriate for their particular dataset and specify values accordingly.Cw appropriate for their particular dataset and specify values accordingly.alpha. The user is advised to consider values for pw appropriate for their particular dataset and specify values accordingly.legend. Default = 'topleft'.commcorrelogramalpha, two.tailed analyses use model=alpha/2)alpha/2)The approach developed here is to instead plot the significance values
of the correlogram in a separate plot and model this plot to determine
the point at which the curve is equal to a chosen Type I error rate
(alpha, typically 0.05). In univariate geostatistics, the range of
correlation is typically found by modeling the semivariogram structure
function (Goovaerts, 1997). To model the correlogram significance plot, we
developed a Gaussian model similar to that used to model univariate
semivariograms:
$$y^s(h) = C_h(1-e^{C_w(h-C_C)^2})$$
where $C_h$ is the curve height, $C_w$ the curve width/steepness, $C_c$ the curve center, and h the lag separation.
The mod.commcorrelogram() function automatically fits this Gaussian curve to commcorrelogram objects using the nlminb optimization function and calculates the correlation distance (where the resulting curve equals alpha) using the uniroot function. The function allows the user to provide initial guesses for each parameter and also allows the user to adjust the weight of points that are closest to the alpha level in the optimization routine. This enhances the fit of the curve around the alpha line. In the case where a two-tailed correlogram has been calculated, the ranges at which the modeled curve crosses the alpha/2 line (where samples are no longer statistical similar) and where it crosses the 1-alpha/2 line (where samples become statistically different), called here the "outer range" are reported.
commcorrelogramdata(mite)
data(mite.xy)
mite.commcorr <-commcorrelogram(sampleData=mite,
sampleLocation=cbind(mite.xy,z=0),lagSize=1,lagNumber=7,
lagTol=0.5,option=1,numTests=9)
mod (mite.commcorr,Ch=1,Cc=2.5,Cw=0.8,pw=3)Run the code above in your browser using DataLab