Colorear diagramas de barras con ggplot2 en R

En este artículo, discutiremos cómo colorear el diagrama de barras usando el paquete ggplot2 en el lenguaje de programación R.

Método 1: usar el argumento de relleno dentro de la función aes

Usar el argumento de relleno dentro de la función aes para que sea igual a la variable de agrupación de los datos dados. Las asignaciones estéticas describen cómo las variables de los datos se asignan a las propiedades visuales (estéticas) de las geomas. Las asignaciones estéticas se pueden configurar en ggplot() y en capas individuales

Sintaxis:

aes(x, y, ...)

Parámetros:

x, y, …: lista de pares de nombre-valor en la forma estética = variable que describe qué variables en los datos de la capa deben asignarse a qué estética utilizada por el geom/stat emparejado. 

Ejemplo:

Usaremos 6 puntos de datos diferentes para el gráfico de barras y luego, con la ayuda del argumento de relleno dentro de la función aes, aplicaremos los colores predeterminados al gráfico de barras en el lenguaje de programación R.

# load the library
library("ggplot2")
  
# create the dataframe with letters and numbers
gfg < -data.frame(
    x=c('A', 'B', 'C', 'D', 'E', 'F'),
    y=c(4, 6, 2, 9, 7, 3))
  
# display the bar
ggplot(gfg, aes(x, y, fill=x)) + geom_bar(stat="identity")

Producción:-

Método 2: Usar la función scale_fill_manual

scale_fill_manual() le permite especificar su propio conjunto de asignaciones desde niveles en los datos hasta valores estéticos. 

Sintaxis:

scale_fill_manual(..., values)

Parámetros:

…: Parámetros comunes de escala discreta: nombre, cortes, etiquetas, valor na., límites y guía.

Ejemplo:

Usaremos 6 puntos de datos diferentes para el gráfico de barras y luego, con la ayuda de la función scale_fill_manual, aplicaremos los colores dados al gráfico de barras en el lenguaje de programación R.

Aporte:

# load the package
library("ggplot2")
  
# create a dataframe
# with letters and numbers
gfg < -data.frame(
    x=c('A', 'B', 'C', 'D', 'E', 'F'),
    y=c(4, 6, 2, 9, 7, 3))
  
# display bar
ggplot(gfg, aes(x, y, fill=x)) +
geom_bar(stat="identity") +
scale_fill_manual(values=c("A"="purple",
                           "B"="yellow",
                           "C"="red",
                           "D"="blue",
                           "E"="green",
                           "F"="black"))

Producción:-