# El mapa con los municiopios se puede bajar de aqui http://sigotn.igac.gov.co/sigotn/default.aspx ##
library(maptools)
library(gplots)
library(RColorBrewer)
Municipios<- readShapePoly("Municipios.shp")
rgb.palette <- colorRampPalette(c("red", "orange","blue"), space = "Lab")
Antioquia<-Municipios[Municipios$NOM_DEPART=="ANTIOQUIA",]
plot(Antioquia,border="black",col=colorRampPalette(brewer.pal(9,"Blues"))(90),lwd=0.9,asp=0,axes =T, las = 2)
No hay comentarios :
Publicar un comentario