# NOT RUN {
library (rpart)
data (oregon.env.vars, oregon.grid)
group <- group.tree (clip.rpart (rpart (oregon.env.vars), best=7))
names(group) <- row.names(oregon.env.vars)
map.groups (oregon.grid, group=group)
# }
Run the code above in your browser using DataLab