Bom, se for para colocar todos os gráficos SEPARADOS em uma mesma tela, isso é possível com o pacote gridExtra. No entanto, dependendo da situação, existe o recurso do facets ou também colocar todas as curvas no mesmo gráfico. Vamos a cada caso:
1) Gráficos separados na mesma tela
library(gridExtra)
p1 <- ggplot(mtcars, aes(mpg, cyl)) + geom_point()
p2 <- ggplot(mtcars, aes(mpg, cyl)) + geom_line()
p3 <- ggplot(mtcars, aes(mpg, cyl)) + geom_line(color="blue")
p4 <- ggplot(mtcars, aes(mpg, cyl)) + geom_line(color="red")
grid.arrange(p1,p2, p3, p4)
2) Para mostrar o caso usando facets, vou utilizar o conjunto de dados tips, do pacote reshape2
library(tips)
library(ggplot2)
data(tips)
head(tips)
total_bill tip sex smoker day time size
1 16.99 1.01 Female No Sun Dinner 2
2 10.34 1.66 Male No Sun Dinner 3
3 21.01 3.50 Male No Sun Dinner 3
4 23.68 3.31 Male No Sun Dinner 2
5 24.59 3.61 Female No Sun Dinner 4
6 25.29 4.71 Male No Sun Dinner 4
Veja que temos o valor da conta, da gorjeta, do sexo, como estava o dia e etc. Suponha que eu queira ver a relação entre a conta e fração da gorjeta em relação à conta:
g1 <- ggplot(tips, aes(x=total_bill, y=tip/total_bill)) + geom_point(shape=1)
Vamos usar o facets e apresentar o mesmo gráfico, só que separando por sexo, isto é, vamos ver quem dá mais gorjeta em relação ao valor da conta, os homens ou as mulheres.
g1 + facet_grid(. ~ sex)
3) Por fim, vamos colocar todas as curvas no mesmo gráfico. Ainda usando o mesmo conjunto de dados tips e utilizando uma função de suavização.
ggplot(tips, aes(x=total_bill, y=tip/total_bill, fill=sex, col=sex)) + geom_point(shape=1) + geom_smooth()
A estratégia a ser utilizada, a 1), a 2) ou a 3) depende de cada caso particular.