## Not run:
# require(raster)
# data(landgen)
# data(fric.raster)
# glc <- genleastcost(landgen, fric.raster, "D", NN=4, path="leastcost")
# lgrMMRR(glc$gen.mat, glc$cost.mats, glc$eucl.mat, nperm=999)
# ## End(Not run)
Run the code above in your browser using DataLab