En el siguiente código se muestran los pasos para hacer un gráfico de barras en R estudio, para ello vamos a graficar las 5 provincias con mayor área conservada del Ecuador.
- Carga la biblioteca ggplot2
library(ggplot2)
2. Establece el directorio de trabajo con "setwd"
setwd("D:/Documents/GBIF")
3. Carga los datos del archivo csv
area_protegida <- read.csv(paste0("Superficie_conservada.csv"), header = TRUE, sep = ",", dec = ".")
4. Crea un gráfico con ggplot() utilizando los datos cargados.
Super_area <- ggplot(data = area_protegida) +
5. Agrega una barra con «geom_bar" utilizando los valores de "Provincia» en el eje x y los valores de "Area" en el eje y y rellenando los bars con un color específico "#EE6AA7"
geom_bar(mapping = aes(x = Provincia, y = Area), stat = "identity", width = 0.5, fill="#EE6AA7")+
6. Agrega texto con «geom_text» utilizando los valores de "Provincia» en el eje x y los valores de "Area" en el eje y y mostrando los valores de «Area» como etiqueta con vjust = -0.3 y size = 3.9
geom_text(aes(x = Provincia, y = Area, label = Area), vjust = -0.3, size = 3.9)+
7. Ajusta los ejes con "scale_y_continuous» con puntos de quiebre específicos y etiquetas personalizadas.
scale_y_continuous(breaks = c(0, 4500000, 9000000, 13500000),
labels = c("0", "4 500 000", "9 000 000", "13 500 000"))+
8. Agrega etiquetas al eje x e y con «xlab" y "ylab"
xlab("Provincia")+
ylab("Área")+
9. Personaliza los títulos de los ejes
theme(axis.title.x = element_text(face="bold", vjust=-0.3, colour="black", size=12)) +
theme(axis.title.y = element_text(face="bold", vjust=2, colour="black", size = 12))+
10. Personaliza el texto de los ejes
theme(axis.text.x = element_text(vjust=0.9, colour="black", size = 12, angle = 40, hjust = 0.8)) +
theme(axis.text.y = element_text(vjust=0.5, colour="black", angle = 90, hjust = 0.5))
11. Plotea el gráfico
Super_area
12. Guarda el gráfico con "ggsave" en un archivo de imagen con las dimensiones de alto, ancho y resolución.
ggsave(Super_area, file="Provincias_superficie_conservada.png", height = 7, width = 9, dpi = 300)
