data(murder)
plot(torontoNight)
plot(torontoBorder, add=TRUE)
points(murder, col="#0000FF40", cex=0.5)
data(torontoPop)
plot(torontoIncome)
points(murder, col="#0000FF40", cex=0.5)
plot(torontoPdens)
points(murder, col="#0000FF40", cex=0.5)
Run the code above in your browser using DataLab