Márgenes interiores: mar y mai
Los márgenes de un gráfico se pueden personalizar con el parámetro gráfico mar, si el margen se mide en líneas de margen y con mai si se mide en pulgadas.
Estos parámetros gráficos son vectores de la forma c(abajo, izquierda, arriba, derecha), donde cada elemento representa el margen de cada lado del gráfico (en líneas de margen o en pulgadas). Ten en cuenta que los valores actuales se pueden consultar con par("mar") o par("mai").
El orden de los elementos de los vectores mar y mai son abajo, izquierda, arriba y derecha. Una forma de recordar el orden es recordar “abiad”.
mar (líneas de margen)
Por defecto par(mar = c(5, 4, 4, 2) + 0.1).
En la figura puedes ver cuantas líneas caben en cada lado del gráfico. Puedes incrementar o reducir el número de líneas de cada lado. Ten en cuenta que el 0.1 es solo para añadir un espacio extra para que todos los textos entren en el área del gráfico.
mai (pulgadas)
Por defecto par(mar = c(1, 0.8, 0.8, 0.4) + 0.02)
Si prefieres establecer el margen en pulgadas en lugar de en líneas modifica este parámetro gráfico.
Ejemplo 1. Usando mar
En este ejemplo vamos a eliminar los márgenes superior y derecho. Ten en cuenta que hemos agregado una caja a la figura para que puedas ver la diferencia.
Márgenes por defecto
# Por defecto
curve(sqrt, 0, 20)
box("figure", col = 4)
Eliminar el margen superior y el derecho
par(mar = c(par("mar")[1], par("mar")[2], 0, 0))
curve(sqrt, 0, 20)
box("figure", col = 4)
Ejemplo 2. Usando mai
En este ejemplo vamos a incrementar todos los márgenes. Una vez más, hemos añadido una caja a la figura para que puedas ver la diferencia.
Márgenes por defecto
# Por defecto
curve(sqrt, 0, 20)
box("figure", col = 4)
Incrementar los márgenes
par(mai = c(1.5, 1.5, 1.5, 1.5))
curve(sqrt, 0, 20)
box("figure", col = 4)
Márgenes exteriores: oma y omi
Los márgenes exteriores se pueden especificar de la misma manera que mar y mai. Puedes establecer el margen en líneas de margen con oma o en pulgadas con omi. Los márgenes exteriores son especialmente útiles para agregar textos en combinaciones de gráficos (como un título común).
Puedes acceder a los márgenes exteriores actuales con par("oma") y par("omi").
Por defecto, par(oma = c(0, 0, 0, 0)). En este ejemplo establecimos par(oma = c(2, 1, 2, 3) + 0.1), por lo que dos líneas se mostrarán debajo del gráfico, una a la izquierda, dos arriba y tres a la derecha.
Ejemplo 1. Usando oma
En el siguiente ejemplo agregamos cuatro líneas de margen en cada lado, por lo que cabrán cuatro líneas de texto apiladas fuera de la figura. Los límites por defecto se representan con una caja azul y los nuevos con una caja negra.
Márgenes exteriores por defecto
# Por defecto
curve(sin, 0, 20)
# Caja de la figura
box("figure", col = 4)
# Text
mtext("Texto interior",
side = 3, adj = 1)
Incrementamos los márgenes exteriores
par(oma = c(4, 4, 4, 4)) # Margenes exteriores
curve(sin, 0, 20) # Gráfico
box("figure", col = 4) # Caja de la figura
mtext("Texto interior", side = 3, adj = 1)
mtext("Texto exterior", side = 3, adj = 1,
outer = TRUE)
par(oma = c(0, 0, 0, 0)) # Restablecemos los márgenes
box("figure", col = 1) # Caja exterior
Ejemplo 2. Usando omi
En este ejemplo añadimos una pulgada al margen inferior y al izquierdo. Una vez más, los límites de la figura por defecto se representan con una caja azul y los nuevos con una caja negra para que puedas ver la diferencia.
Márgenes exteriores por defecto
# Por defecto
curve(sin, 0, 20)
# Caja de la figura
box("figure", col = 4)
# Texto
mtext("Texto interior", side = 3, adj = 1)
Márgenes inferior e izquierdo
par(omi = c(1, 1, 0, 0)) # Márgenes exteriores
curve(sin, 0, 20) # Gráfico
box("figure", col = 4) # Caja interior
mtext("Texto interior", side = 3, adj = 1)
mtext("Texto exterior", side = 1, adj = 0,
outer = TRUE)
par(oma = c(0, 0, 0, 0)) # Restablece los márgenes
box("figure", col = 1) # Caja exterior
