Capítulo6 Gráfico de dispersão

Neste capítulo você irá aprender a criar Gráfico de dispersão no R utilizando o ggplot2.

6.1 Gráfico de Barras (simples)

O gráfico de dispersão (“scatter plot”) é um tipo de gráfico que utiliza cordenadas cartesianas para representar a relação entre duas (ou mais) variáveis de um banco de dados. Para plotar esse gráfico você deve utilizar a função ‘geom_point()’.

# carregando banco de dados
data("iris")

# Gráfico de dispersão
ggplot(iris, aes(y = Petal.Length, x = Petal.Width)) +
  geom_point()

6.2 Ajustes básicos

Argumentos

• shape para definir o símbolo dos pontos.
  
• size para definir o tamanho dos pontos.
  
• fill para definir a cor de preenchimento dos pontos.
  
• color para definir a cor da linha de contorno dos pontos.

6.2.1 Tipos de símbolos

O tipo de símbolo que será plotado é definido pelo argumento “shape =” dentro da função ‘geom_point()’. As opções disponíveis são:

6.3 Símbolo

#Gráfico de dispersão com shape 1
ggplot(iris, aes(y = Petal.Length, x = Petal.Width)) +
  geom_point(shape = 1, size = 3)
#Gráfico de dispersão com shape 1
ggplot(iris, aes(y = Petal.Length, x = Petal.Width)) +
  geom_point(shape = 17, size = 3)

6.4 Tamanho

#Gráfico de dispersão com shape 1
ggplot(iris, aes(y = Petal.Length, x = Petal.Width)) +
  geom_point(size = 1)
#Gráfico de dispersão com shape 1
ggplot(iris, aes(y = Petal.Length, x = Petal.Width)) +
  geom_point(size = 5)

6.5 Cor e preenchimento

# Alterando cor e preenchimento
ggplot(iris, aes(y = Petal.Length, x = Petal.Width)) +
  geom_point(color = "blue", fill = "red", shape = 21)
# Alterando cor e preenchimento
ggplot(iris, aes(y = Petal.Length, x = Petal.Width)) +
  geom_point(color = "red", fill = "black", shape = 21)

6.6 Gráfico de dispersão (bonito)

Todo o final de capítulo temos a demonstração de um gráfico mais elegante. Veja o capítulo XXX para mais detalhes de como manipular cada detalhe do seu gráfico com o ggplot2, mas ao observar o script abaixo você pode ir aprendendo com cada exemplo.

#Gráfico de Barras
ggplot(iris, aes(y = Petal.Length, x = Sepal.Length ,
                 shape = Species, color = Species)) +
  geom_point(size = 3, alpha = .7) +
  scale_y_continuous(limits = c(0,7), breaks = seq(0,6,1)) +
  theme_classic(base_size = 18) +
  theme(legend.position = "top") +
  xlab("Largura das Pétalas (mm)") + 
  ylab("Comprimento das Pétalas (cm)")