# NOT RUN {
if (all(c(require(SpatialTools), require(sp)))) {
data(meuse, package = "sp")
lags_points <- variogramBins(coords = meuse[, 1:2], count = "points")
lags_pairs <- variogramBins(coords = meuse[, 1:2], count = "pairs")
}
# }
Run the code above in your browser using DataLab