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