¿Cómo especificar manualmente los colores para Barplot en ggplot2 en R?

En este artículo, discutiremos cómo especificar manualmente los colores para Barplot en ggplot2 en el lenguaje de programación R.

Para especificar los colores de la barra en Barplot en ggplot2, usamos la función scale_fill_manual del paquete ggplot2. Dentro de esta función, necesitamos especificar un color para cada una de las barras como un vector. Podemos usar colores usando nombres y códigos hexadecimales.

Sintaxis: plot+ scale_fill_manual(values=<color-vector>)

Ejemplo 1:

Aquí hay un gráfico de barras ggplot2 básico con los colores predeterminados:

# Create sample data
set.seed(5642)                             
sample_data <- data.frame(name = c("Geek1","Geek2",
                                   "Geek3","Geek4",
                                   "Geeek5") ,
                          value = c(31,12,15,28,45)) 
# Load ggplot2 package
library("ggplot2") 
  
# Create bar plot with default colors
plot<-ggplot(sample_data,
             aes(name,value, fill=name)) 
+ geom_bar(stat = "identity")
plot

Producción:

Para especificar colores manualmente, simplemente agregue la función scale_fill_manual() para trazar:

# Create sample data
set.seed(5642)                             
sample_data <- data.frame(name = c("Geek1","Geek2",
                                   "Geek3","Geek4",
                                   "Geeek5") ,
                          value = c(31,12,15,28,45)) 
# Load ggplot2 package
library("ggplot2") 
  
# Create bar plot with default colors
plot<-ggplot(sample_data,
             aes(name,value, fill=name))
+ geom_bar(stat = "identity")
  
# add scale_fill_manual function to specify colors
plot + scale_fill_manual(values = c("green","yellow",
                                    "red","pink","blue"))

Producción:

Incluso podemos usar códigos hexadecimales de color en lugar de nombres:

# Create sample data
set.seed(5642)                             
sample_data <- data.frame(name = c("Geek1","Geek2",
                                   "Geek3","Geek4",
                                   "Geeek5") ,
                          value = c(31,12,15,28,45)) 
# Load ggplot2 package
library("ggplot2") 
  
# Create bar plot with default colors
plot<-ggplot(sample_data, aes(name,value, fill=name)) +
geom_bar(stat = "identity")
  
# add scale_fill_manual function to specify colors
plot + scale_fill_manual(values = c("#207345","#0d576e",
                                    "#610d6e","#6e0d27",
                                    "#6e470d"))

Producción: