Datos

Los datos correponden a edades de estudiantes de cierta institución educativa comos se muestra a continuación

library(ggplot2)
## Warning: package 'ggplot2' was built under R version 4.5.2
datos<-c(12,12,13,14,14,15,15,16,14,13,14,14,15,16,17)
tabla <- table(datos)
barplot(tabla,
        main = "Distribución de los datos (Base R)",
        xlab = "Valor",
        ylab = "Frecuencia",
        col = "green",
        border = "black")

datos<-c(12,12,13,14,14,15,15,16,14,13,14,14,15,16,17)
df <- data.frame(valor = datos)
ggplot(df, aes(x = valor)) +
  geom_bar() +
  labs(title = "Distribución de los datos (ggplot2)", 
       x = "Valor", 
       y = "Frecuencia")

# Crear un gráfico de barras
ggplot(df, aes(x = valor)) +
  geom_bar(fill = "steelblue", color = "black") +
  labs(title = "Distribución de los datos (ggplot2)", 
       x = "Valor", y = "Frecuencia")

ggplot(df, aes(x = valor, fill = as.factor(valor))) +
  geom_bar(color = "black") +
  labs(title = "Distribución de los datos (ggplot2 por categorías)",
       x = "Valor", y = "Frecuencia", fill = "Valor") +
  scale_fill_brewer(palette = "Set3")