# NOT RUN {
data(ConwyData)
list2env(ConwyData, environment())
m <- aoi(msk=ConwyLU, mskSub=c(2,3))
head( extractByMask(ConwySlope, msk=m), 20)
# Extract making a raster
library(raster)
plot( extractByMask(ConwySlope, msk=m, spatial=TRUE) )
# }
Run the code above in your browser using DataLab