# NOT RUN {
##load the data
data(mesa.model)
##create a data matrix
M1 <- createDataMatrix(mesa.model)
dim(M1)
head(M1)
##create data matrix for only a few locations
M2 <- createDataMatrix(mesa.model, subset =
c("60370002","60370016","60370113","60371002",
"60371103","60371201","L001","L002"))
dim(M2)
head(M2)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab