R Función del día

par (mar = c(5.1, 4.1, 4.1, 2.1), mgp = c (3, 1, 0), las=0)
par establece o ajusta los parámetros de trazado. Aquí tenemos en cuenta los tres parámetros siguientes: tamaño de margen (mar), ubicaciones de etiquetas de eje (mgp) y orientación de etiquetas de eje (las).
  • mar-Un vector numérico de longitud 4, que establece los tamaños de margen en el siguiente orden: inferior, izquierdo, superior y derecho. El valor predeterminado es c(5.1, 4.1, 4.1, 2.1).
  • mgp: Un vector numérico de longitud 3, que establece las ubicaciones de la etiqueta del eje en relación con el borde de la ventana de trazado interior. El primer valor representa la ubicación de las etiquetas (es decir, xlab e ylab en la gráfica), el segundo las etiquetas de marca de verificación y el tercero las marcas de verificación. El valor predeterminado es c (3, 1, 0).
  • las-Un valor numérico que indica la orientación de las etiquetas de marca de verificación y cualquier otro texto añadido a un gráfico después de su inicialización. Las opciones son las siguientes: siempre paralelo al eje (el valor predeterminado, 0), siempre horizontal (1), siempre perpendicular al eje (2) y siempre vertical (3).
Ejemplo. Los valores predeterminados de los tres parámetros de trazado se muestran utilizando cadenas de caracteres de sus nombres de argumento en par (véase par(char)), seguidos de un código de ejemplo que crea cuatro gráficos, donde se modifica un parámetro de trazado adicional en cada gráfico. Además de las parcelas individuales que se muestran a continuación, un PDF de 4 páginas de las parcelas está disponible para una navegación más fácil.
 > par("mar") 5.1 4.1 4.1 2.1> par("mgp") 3 1 0> par("las") 0> > conjunto.semilla(5)> x <- rnorm(200)> y <- 25 - 22* x + 5*x^2 + rnorm(200)> > png("par-120208-01.png")> plot (x, y, main="defaults")> dev.off () quartz 2 > > png ("par-120208-02.png")> par(mar=c(3.5, 3.5, 2, 1))> plot(x, y, main="par(mar=c(3.5, 3.5, 2, 1))")> dev.off () quartz 2 > > png ("par-120208-03.png")> par(mar=c(3.5, 3.5, 2, 1), mgp=c(2.4, 0.8, 0))> plot(x, y, main="par(mar=c(3.5, 3.5, 2, 1), mgp=c(2.4, 0.8, 0))")> dev.off () quartz 2 > > png ("par-120208-04.png")> par(mar=c(3.5, 3.5, 2, 1), mgp=c(2.4, 0.8, 0), las=1)> plot(x, y,+ main="par(mar=c(3.5, 3.5, 2, 1), mgp=c(2.4, 0.8, 0), las=1)")> dev.off () quartz 2 
Los datos son reproducibles gracias al conjunto.la función seed y las gráficas se guardaron en archivos usando la función png.