Carregar pacotes ggplot2 e MASS e carregar dataframe Cars93.

library(ggplot2)
library(MASS)
View(Cars93)

Diagramas de dispersão

Boa maneira de mostrar relacionamento entre duas variáveis.

ggplot(Cars93, aes(x=Horsepower,y=MPG.city)) + geom_point()

Outra maneira mostrando o número dos clindros, como já fizemos nos gráficos de base R.

Vamos fazer um mapeamento adicional em aes, usando label para Cylinders, e o geom_text()

E pra melhorar a aparência theme_bw() elimina o fundo cinza e theme elimina a grade.

Usamos element_blank() que é uma função que desenha um elemento em branco.

ggplot(Cars93, aes(x=Horsepower,y=MPG.city, label = Cylinders)) + geom_text() + theme_bw() + theme(panel.grid = element_blank())

Modelo Extra - Scatterplot

options(scipen=999)  # turn-off scientific notation like 1e+48


library(ggplot2)
theme_set(theme_bw())  # pre-set the bw theme.
data("midwest", package = "ggplot2")

# Scatterplot
gg <- ggplot(midwest, aes(x=area, y=poptotal)) + 
  geom_point(aes(col=state, size=popdensity)) + 
  geom_smooth(method="loess", se=F) + 
  xlim(c(0, 0.1)) + 
  ylim(c(0, 500000)) + 
  labs(subtitle="Area Vs Population", 
       y="Population", 
       x="Area", 
       title="Scatterplot", 
       caption = "Source: midwest")

plot(gg)
## Warning: Removed 15 rows containing non-finite values (stat_smooth).
## Warning: Removed 15 rows containing missing values (geom_point).

Referências

Schmuller, Joseph. Análise Estatística com R - Para leigos - Tradução da 2a edição. Alta Books Editora. 2019.

Oliveira, Paulo; Guerra, Saulo; McDonnell, Robert. Ciência de Dados com R. Introdução.Editora IBPAD. Brasília. 2018. Disponível em: {https://cdr.ibpad.com.br/cdr-intro.pdf}