Olá!
Eu inseri esses comandos lá no R:
library(ggplot2)
lm_smooth <- geom_smooth(method = lm, size = 1)
qplot(percwhite, percbelowpoverty, data = midwest,
weight = popdensity, size = popdensity) + lm_smooth
E o R me retornou esse gráfico:
Alguém saberia me dizer como posso determinar os valores que aparecem na legenda? Por exemplo: ao invés de 4 tamanhos de círculos diferentes, eu gostaria de determinar quantos eu quisesse.