# NOT RUN {
#WaterRaster <- raster("wenlock raster UTM.tif") # Load the raster
#tr <- transition(WaterRaster,
# transitionFunction = mean,
# directions = 8) # Create a Transition object from the raster
# Load the points file
#data(PointsLeastCost_crocs)
# Generate the Least Cost distance matrix
#RasterDM <- GenerateLeastCostDistance(PointsLeastCost_crocs,
# tr)
# }
Run the code above in your browser using DataLab