Gráfica de Barras con ggplot2

library(dplyr)

library(descriptr)

library(ggplot2)

library(datos)

A continuación se muestra el código usado para crear la gráfica de barras con la funcion ggplot() y la variable de raza extraída directamente de la base de datos inical.

dat <- data.frame(Razas=c("Otra","Negra","Blanca","No Aplica"),Frecuencia=c(9,23,88,0))

ggplot(dat,aes(x=Razas,y=Frecuencia,fill=Razas))+geom_col()+scale_x_discrete(limits = c("Blanca", "Negra", "Otra","No Aplica"))+ggtitle("Gráfica de Barras para Raza")+theme(legend.position = "none")+geom_text(aes(label = Frecuencia), vjust = 2, colour = "black")