globeMap <- read.csv2("~/R/visualizacion/mapas/map_2022.csv", na.strings="\"\"", stringsAsFactors=TRUE)
#librerias
library(ggplot2)
mapa <- ggplot(globeMap, aes(x=globeMap$long, y=globeMap$lat, group=as.factor(group)))+
labs(title = "Maps 2022",x = "Long", y = "Lat") +
geom_polygon(aes(fill=globeMap$sub.region))
#scale_fill_brewer(type='qual')
mapa