Poseemos la mejor solución que descubrimos on line. Esperamos que te sea de mucha ayuda y si deseas aportar algún detalle que nos pueda ayudar a perfeccionar nuestra información hazlo con total libertad.
Solución:
Necesitas agregar el col argumentos en el hist método de la siguiente manera:
t<- c(69,68,67,65,65,62,59,59,54)
hist(t, main="Distribution of Player Ratings",xlim = c(0,99),
breaks=c(seq(40,99,5)), col = c("blue", "red", "gray", "green"))
Vea la imagen que obtuve después de la ejecución anterior:
Ahora puede reemplazar los valores de color (ya sea el nombre o los valores hexadecimales como "#FFFF00") según sus requisitos.
En su pregunta anterior, había mencionado ggplot2así que aquí hay un ggplot2 solución:
Primero simule su conjunto de datos:
set.seed(123)
df <- data.frame(X = sample(50:89, 500, replace = T))
Agregue una nueva variable que defina sus criterios de color:
df$group = ifelse(df$X < 66, "50-65", ifelse(df$X < 75, "66-74", "75-89"))
Ahora, carga el ggplot2 biblioteca para crear un histograma
library(ggplot2)
ggplot(df, aes(X, fill = group)) + geom_histogram()
Para dar colores personalizados, utilice scale_fill_manual:
ggplot(df, aes(X, fill = group)) + geom_histogram() +
scale_fill_manual(values = c("50-65" = "#CD7F32",
"66-74" = "#C0C0C0",
"75-89" = "gold"))
Así es como se ve la figura ahora:
aunque incluiste xlim = c(0,99) (que no es visible en el diagrama adjunto), no sé por qué usarías eso. Si lo desea, puede agregar un xlim argumento con + xlim(0,99).
Para aprender más sobre ggplot2mira aquí.
Nota: Puede definir el número de bins o binwidth en geom_histogram. Consulte esto para más
valoraciones y comentarios
Nos encantaría que puedieras dar difusión a este post si te fue útil.