Como atribuir cores por fator no ggplot2 (com exemplos)

Muitas vezes você pode querer atribuir cores a pontos em um gráfico ggplot2 com base em uma variável categórica.

Felizmente, isso é fácil de fazer usando a seguinte sintaxe:

 ggplot(df, aes (x=x_variable, y=y_variable, color=color_variable)) +
  geom_point()

Este tutorial fornece vários exemplos de como usar essa sintaxe na prática usando o conjunto de dados R integrado chamado iris :

 #view first six rows of iris dataset
head(iris)

  Sepal.Length Sepal.Width Petal.Length Petal.Width Species
1 5.1 3.5 1.4 0.2 setosa
2 4.9 3.0 1.4 0.2 setosa
3 4.7 3.2 1.3 0.2 setosa
4 4.6 3.1 1.5 0.2 setosa
5 5.0 3.6 1.4 0.2 setosa
6 5.4 3.9 1.7 0.4 setosa

Exemplo 1: Use cores padrão

O código a seguir mostra como atribuir cores padrão a pontos em um gráfico ggplot2 com base na variável fatorial Species :

 library (ggplot2)

ggplot(iris, aes (x=Sepal.Length, y=Sepal.Width, color=Species)) +
  geom_point() 

Como não especificamos uma escala de cores ou uma lista de cores personalizada, o ggplot2 simplesmente atribuiu uma lista de cores vermelha, verde e azul padrão aos pontos.

Exemplo 2: Use cores personalizadas

O código a seguir mostra como atribuir cores personalizadas a pontos em um gráfico ggplot2 usando scale_color_manual() :

 library (ggplot2)

ggplot(iris, aes (x=Sepal.Length, y=Sepal.Width, color=Species)) +
  geom_point() +
  scale_color_manual( values = c(" setosa " = " purple ",
                                " versicolor =" orange ",
                                " virginica "=" steelblue ")) 

Observe que também poderíamos ter usado códigos de cores hexadecimais para especificar cores.

Exemplo 3: Use uma escala de cores personalizada

O código a seguir mostra como atribuir cores personalizadas a pontos em um gráfico ggplot2 usando uma escala de cores personalizada do pacote RColorBrewer :

 library (ggplot2)
library (RColorBrewer)

#define custom color scale
myColors <- brewer. pal (3, " Spectral ")
names(myColors) <- levels(iris$Species)
custom_colors <- scale_color_manual(name = " Species Names ", values = myColors)

ggplot(iris, aes (x=Sepal.Length, y=Sepal.Width, color=Species)) +
  geom_point() +
  custom_colors

Recursos adicionais

Como criar gráficos lado a lado no ggplot2
Como alterar o título da legenda no ggplot2
Um guia completo para os melhores temas ggplot2