# NOT RUN {
##Load oregon.cdp10 data
data(oregon.cdp10)
##look at the list of oregon CDP names in alphabetic order
oregon.cdp10$name[order(oregon.cdp10$name)]
##grab the CDP of Portland, OR
portland<-city(name="portland",state="or")
##plot the polygon of Portland, OR
plot(portland)
title("Portland, OR")
# }
Run the code above in your browser using DataLab