Me surgió la curiosidad de como realizar múltiples gráficos en ggplot2
usando el loop for
.
Por ejemplo si tengo este marco de datos.
df1<-read.csv("https://vincentarelbundock.github.io/Rdatasets/csv/AER/Journals.csv")
Y deseo hacer un gráfico de dispersión entre la variable price
con: pages
, charpp
, citations
y subs
.
Para lo cual lo podría generar cada gráfico por separado. Y los junto todos con la función plot_grid()
del paquete cowplot
library(ggplot2)
f1<-ggplot(df1, aes(x=pages, y=price))+
geom_point()+
theme_bw()
f2<-ggplot(df1, aes(x=citations, y=price))+
geom_point()+
theme_bw()
f3<-ggplot(df1, aes(x=subs, y=price))+
geom_point()+
theme_bw()
f4<-ggplot(df1, aes(x=charpp, y=price))+
geom_point()+
theme_bw()
library(cowplot)
plot_grid(f1,f2,f3,f4)
A lo que obtengo el siguiente resultado.
Pero al tratar de hacer el mismo procedimiento ¿con un for
cómo se haría? dejaré una respuesta, la única que sé. Pero sería genial si pueden compartir otras formas más eficientes de hacerlas.