Last chance! 50% off unlimited learning
Sale ends in
# NOT RUN {
cities$have <- factor((cities$REGION=="ON")|(cities$REGION=="WEST"))
plot(POP1996~POP1992, data=cities, col=as.integer(cities$have))
# }
Run the code above in your browser using DataLab