# NOT RUN {
# }
# NOT RUN {
## Plum Island Ecosystems
## observed data
obs <- ObsLulcRasterStack(x=pie,
pattern="lu",
categories=c(1,2,3),
labels=c("forest","built","other"),
t=c(0,6,14))
## explanatory variables
ef <- ExpVarRasterList(x=pie, pattern="ef")
## resample to ensure maps have same characteristics as observed maps
ef <- resample(x=ef, y=obs, method="ngb")
# }
Run the code above in your browser using DataLab