datos <- data.frame(Cultivo = c("Maíz", "Trigo", "Soja", "Arroz"),
Rendimiento = c(120, 80, 90, 110))
#Analisis de la grafica
Este grafico de barras representa el rendimiento de 4 cultivos principales: maiz, trigo, soya y arroz. los valores se expresan en toneladas por hectarea. observamos que el maiz lidera el rendimiento con 120 Ton/Ha, seguido por el arroz con 110 Ton/Ha, el trigo y la soya tienen rendimientos de 80 y 90 Ton/Ha, respectivamente. estos datos proporcionan una vision clara de las diferencias en el rendimiento entre los cultivos, lo que puede ser util para la toma de decisiones en el ambito agronomico.
# Carga la librería
library(ggplot2)
grafico <- ggplot(datos, aes(x = Rendimiento, y = Cultivo, fill = Cultivo)) +
geom_bar(stat = "identity", position = "dodge") +
labs(title = "Rendimiento de Cultivos",
x = "Rendimiento (ton/ha)",
y = "Tipo de Cultivo")
grafico