ggplot(datos.m, aes(x = raza, fill = raza)) +
geom_bar(olor = "black", alpha = 0.7) +
coord_flip() +
labs(title = "Distribución de la variable Raza",
x = "Categorías de raza",
y = "Frecuencia absoluta") +
scale_fill_manual(values = c("darkblue","purple","gold","cadetblue3")) +
theme_minimal()