Buen día para todos. Deseo presentar distintos gráficos en uno solo, pero he tenido problemas con el resultado, ¿alguien sabe cómo podría mejorarlo? Quedo atento, gracias de antemano. *Código:* pdf("RESULTS/GRAPHS/mi_grafico.pdf", paper = "letter") grid.arrange(nina_plot_1, nina_plot_2, nina_plot_3, nina_plot_4, nino_plot_1, nino_plot_2, nino_plot_3, nino_plot_4, norm_plot_1, norm_plot_2, norm_plot_3, norm_plot_4, nrow = 4, ncol = 3) dev.off() Adjunto la imagen resultado: [image: image.png] -- *Aviso legal:* El contenido de este mensaje y los archivos adjuntos son confidenciales y de uso exclusivo de la Universidad Nacional de Colombia. Se encuentran dirigidos sólo para el uso del destinatario al cual van enviados. La reproducción, lectura y/o copia se encuentran prohibidas a cualquier persona diferente a este y puede ser ilegal. Si usted lo ha recibido por error, infórmenos y elimínelo de su correo. Los Datos Personales serán tratados conforme a la Ley 1581 de 2012 y a nuestra Política de Datos Personales que podrá consultar en la página web www.unal.edu.co <http://www.unal.edu.co/>.* *Las opiniones, informaciones, conclusiones y cualquier otro tipo de dato contenido en este correo electrónico, no relacionados con la actividad de la Universidad Nacional de Colombia, se entenderá como personales y de ninguna manera son avaladas por la Universidad. ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/fe8c78a5/attachment-0001.html> ------------ próxima parte ------------ A non-text attachment was scrubbed... Name: image.png Type: image/png Size: 113028 bytes Desc: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/fe8c78a5/attachment-0001.png>
Puedes probar con la libreria cowplot Arranging plots in a grid | | | | | | | | | | | Arranging plots in a grid cowplot | | | En lunes, 5 de junio de 2023, 21:50:09 CEST, David Camilo Gomez Medina <dcgomezme en unal.edu.co> escribió: Buen día para todos. Deseo presentar distintos gráficos en uno solo, pero he tenido problemas con el resultado, ¿alguien sabe cómo podría mejorarlo? Quedo atento, gracias de antemano. Código:pdf("RESULTS/GRAPHS/mi_grafico.pdf", paper = "letter") grid.arrange(nina_plot_1, nina_plot_2, nina_plot_3, nina_plot_4, nino_plot_1, nino_plot_2, nino_plot_3, nino_plot_4, norm_plot_1, norm_plot_2, norm_plot_3, norm_plot_4, nrow = 4, ncol = 3) dev.off() Adjunto la imagen resultado: Aviso legal: El contenido de este mensaje y los archivos adjuntos son confidenciales y de uso exclusivo de la Universidad Nacional de Colombia. Se encuentran dirigidos sólo para el uso del destinatario al cual van enviados. La reproducción, lectura y/o copia se encuentran prohibidas a cualquier persona diferente a este y puede ser ilegal. Si usted lo ha recibido por error, infórmenos y elimínelo de su correo. Los Datos Personales serán tratados conforme a la Ley 1581 de 2012 y a nuestra Política de Datos Personales que podrá consultar en la página web www.unal.edu.co. Las opiniones, informaciones, conclusiones y cualquier otro tipo de dato contenido en este correo electrónico, no relacionados con la actividad de la Universidad Nacional de Colombia, se entenderá como personales y de ninguna manera son avaladas por la Universidad. _______________________________________________ R-help-es mailing list R-help-es en r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/34177367/attachment-0001.html> ------------ próxima parte ------------ A non-text attachment was scrubbed... Name: image.png Type: image/png Size: 113028 bytes Desc: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/34177367/attachment-0001.png>
También los paquetes, ggpubr y patchwork On Mon, 5 Jun 2023 at 13:50 David Camilo Gomez Medina <dcgomezme en unal.edu.co> wrote:> Buen día para todos. Deseo presentar distintos gráficos en uno solo, pero > he tenido problemas con el resultado, ¿alguien sabe cómo podría mejorarlo? > > Quedo atento, gracias de antemano. > > *Código:* > pdf("RESULTS/GRAPHS/mi_grafico.pdf", paper = "letter") > grid.arrange(nina_plot_1, nina_plot_2, nina_plot_3, nina_plot_4, > nino_plot_1, nino_plot_2, nino_plot_3, nino_plot_4, > norm_plot_1, norm_plot_2, norm_plot_3, norm_plot_4, > nrow = 4, ncol = 3) > dev.off() > > Adjunto la imagen resultado: > > [image: image.png] > > *Aviso legal:* El contenido de este mensaje y los archivos adjuntos son > confidenciales y de uso exclusivo de la Universidad Nacional de Colombia. > Se encuentran dirigidos sólo para el uso del destinatario al cual van > enviados. La reproducción, lectura y/o copia se encuentran prohibidas a > cualquier persona diferente a este y puede ser ilegal. Si usted lo ha > recibido por error, infórmenos y elimínelo de su correo. Los Datos > Personales serán tratados conforme a la Ley 1581 de 2012 y a nuestra > Política de Datos Personales que podrá consultar en la página web > www.unal.edu.co. Las opiniones, informaciones, conclusiones y cualquier > otro tipo de dato contenido en este correo electrónico, no relacionados con > la actividad de la Universidad Nacional de Colombia, se entenderá como > personales y de ninguna manera son avaladas por la Universidad. > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org > https://stat.ethz.ch/mailman/listinfo/r-help-es >-- *Manuel Spínola, Ph.D.* Instituto Internacional en Conservación y Manejo de Vida Silvestre Universidad Nacional Apartado 1350-3000 Heredia COSTA RICA mspinola en una.cr <mspinola en una.ac.cr> mspinola10 en gmail.com Teléfono: (506) 8706 - 4662 Sitio web institucional: ICOMVIS <http://www.icomvis.una.ac.cr/index.php/manuel> Sitio web personal: Sitio personal <https://mspinola-sitioweb.netlify.app> Blog sobre Ciencia de Datos: Blog de Ciencia de Datos <https://mspinola-ciencia-de-datos.netlify.app> ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/42530d19/attachment-0001.html> ------------ próxima parte ------------ A non-text attachment was scrubbed... Name: image.png Type: image/png Size: 113028 bytes Desc: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/42530d19/attachment-0001.png>
Muchas gracias a todos por las sugerencias de los paquetes, voy a probar cuál se ajusta más a mis necesidades. Igualmente, caigo en cuenta de modificar el tamaño de fuente. Si conocen más herramientas, quedo atento. Muchas gracias. On Mon, 5 Jun 2023 at 14:49, David Camilo Gomez Medina < dcgomezme en unal.edu.co> wrote:> Buen día para todos. Deseo presentar distintos gráficos en uno solo, pero > he tenido problemas con el resultado, ¿alguien sabe cómo podría mejorarlo? > > Quedo atento, gracias de antemano. > > *Código:* > pdf("RESULTS/GRAPHS/mi_grafico.pdf", paper = "letter") > grid.arrange(nina_plot_1, nina_plot_2, nina_plot_3, nina_plot_4, > nino_plot_1, nino_plot_2, nino_plot_3, nino_plot_4, > norm_plot_1, norm_plot_2, norm_plot_3, norm_plot_4, > nrow = 4, ncol = 3) > dev.off() > > Adjunto la imagen resultado: > > [image: image.png] >-- *Aviso legal:* El contenido de este mensaje y los archivos adjuntos son confidenciales y de uso exclusivo de la Universidad Nacional de Colombia. Se encuentran dirigidos sólo para el uso del destinatario al cual van enviados. La reproducción, lectura y/o copia se encuentran prohibidas a cualquier persona diferente a este y puede ser ilegal. Si usted lo ha recibido por error, infórmenos y elimínelo de su correo. Los Datos Personales serán tratados conforme a la Ley 1581 de 2012 y a nuestra Política de Datos Personales que podrá consultar en la página web www.unal.edu.co <http://www.unal.edu.co/>.* *Las opiniones, informaciones, conclusiones y cualquier otro tipo de dato contenido en este correo electrónico, no relacionados con la actividad de la Universidad Nacional de Colombia, se entenderá como personales y de ninguna manera son avaladas por la Universidad. ------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/527d02d0/attachment-0001.html> ------------ próxima parte ------------ A non-text attachment was scrubbed... Name: image.png Type: image/png Size: 113028 bytes Desc: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230605/527d02d0/attachment-0001.png>
Buenas, Desconozco si estas opciones funcionan con gráficos generados con qqplot, pero 1. La instrucción par parte la pantalla en una matriz de forma que los sucesivos gráficos se van pintando en celdas. 2. Similar split.screen. La función split.screen divide el dispositivo en partes que a su vez pueden dividirse en partes. La función screen selecciona el dispositivo a usar. 3. Otra alternativa es la instrucción layout que recibe como argumento una matriz que asocia a cada porción de la pantalla un número Más abajo pongo ejemplos de uso. # Ejemplo de 1 # Guardamos los parámetros gráficos pg <- par() # Partimos la ventana gráfica en 4 celdas, dos filas y dos columnas par(mfrow=c(2,2)) # Hacemos los gráficos hist(runif(100), main="Muestra 1", xlab="", ylab="", col="red") hist(runif(100), main="Muestra 2", xlab="", ylab="", col.axis="blue") hist(runif(100), main="Muestra 3", xlab="", ylab="", lty=10) hist(runif(100), main="Muestra 4", xlab="", ylab="", col.main="yellow") # Restauramos los parámetros par(pg) # Ejemplo de 2 split.screen(c(1,2)) screen(1) hist(runif(100), main="Muestra 1", xlab="", ylab="", col="red") split.screen(c(2,1),2) screen(3) hist(runif(100), main="Muestra 2", xlab="", ylab="", col.axis="blue") screen(4) hist(runif(100), main="Muestra 3", xlab="", ylab="", lty=10) # Ejemplo de 3 # Dividimos la pantalla en 2 filas y 3 columnas layout(matrix(c(1, 1, 2, 3, 2, 4), 2, 3)) layout.show(3) Un saludo. -- -------------------------------------------------- http://knuth.uca.es/R -------------------------------------------------- Proyecto R-UCA -------------------------------------------------- Nombre: Manuel Muñoz Márquez Departamento: Departamento de Estadística e Investigación Operativa Institución: Escuela Superior de Ingeniería Organización: Universidad de Cádiz -------------------------------------------------- El lun, 05-06-2023 a las 14:49 -0500, David Camilo Gomez Medina escribió:> Buen día para todos. Deseo presentar distintos gráficos en uno solo, pero he tenido problemas con el resultado, ¿alguien sabe cómo podría > mejorarlo? > > Quedo atento, gracias de antemano. > > Código: > pdf("RESULTS/GRAPHS/mi_grafico.pdf", paper = "letter") > grid.arrange(nina_plot_1, nina_plot_2, nina_plot_3, nina_plot_4, > nino_plot_1, nino_plot_2, nino_plot_3, nino_plot_4, > norm_plot_1, norm_plot_2, norm_plot_3, norm_plot_4, > nrow = 4, ncol = 3) > dev.off() > > Adjunto la imagen resultado: > > image.png > > Aviso legal: El contenido de este mensaje y los archivos adjuntos son confidenciales y de uso exclusivo de la Universidad Nacional de > Colombia. Se encuentran dirigidos sólo para el uso del destinatario al cual van enviados. La reproducción, lectura y/o copia se encuentran > prohibidas a cualquier persona diferente a este y puede ser ilegal. Si usted lo ha recibido por error, infórmenos y elimínelo de su > correo. Los Datos Personales serán tratados conforme a la Ley 1581 de 2012 y a nuestra Política de Datos Personales que podrá consultar en > la página web www.unal.edu.co. Las opiniones, informaciones, conclusiones y cualquier otro tipo de dato contenido en este correo > electrónico, no relacionados con la actividad de la Universidad Nacional de Colombia, se entenderá como personales y de ninguna manera son > avaladas por la Universidad. > _______________________________________________ > R-help-es mailing list > R-help-es en r-project.org > https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!WEOmwARNYG3iWGJ0VaNfRksSrCH7Is_jTqVHEjqFRBSACaBxQokrPxHjzwxSD-nZfgK16NBPEgVkXdp7qws$ >------------ próxima parte ------------ Se ha borrado un adjunto en formato HTML... URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230606/4626982a/attachment-0001.html> ------------ próxima parte ------------ A non-text attachment was scrubbed... Name: image.png Type: image/png Size: 113028 bytes Desc: no disponible URL: <https://stat.ethz.ch/pipermail/r-help-es/attachments/20230606/4626982a/attachment-0001.png>