Ejes y etiquetas en R

Muchas funciones de trazado de alto nivel (plot, hist, boxplot, etc.) te permiten incluir opciones de eje y texto (así como otros parámetros gráficos). Por ejemplo:

 # Specify axis options within plot()
plot(x, y, main="title", sub="subtitle",
  xlab="X-axis label", ylab="y-axix label",
  xlim=c(xmin, xmax), ylim=c(ymin, ymax))Con la tecnología de

Para un control más fino o para la modularización, puedes utilizar las funciones que se describen a continuación.

Títulos

Utiliza la función title( ) para añadir etiquetas a un gráfico.

title(main="main title", sub="sub-title",
 xlab="x-axis label", ylab="y-axis label")Con la tecnología de

Muchos otros parámetros gráficos (como el tamaño del texto, la fuente, la rotación y el color) también pueden especificarse en la función title( ).

# Add a red title and a blue subtitle. Make x and y
# labels 25% smaller than the default and green.
title(main="My Title", col.main="red",
  sub="My Sub-title", col.sub="blue",
  xlab="My X label", ylab="My Y label",
  col.lab="green", cex.lab=0.75)Con la tecnología de

Anotaciones de texto

Se puede añadir texto a los gráficos utilizando las funciones text( ) y mtext( ). text( ) coloca el texto dentro del gráfico, mientras que mtext( ) coloca el texto en uno de los cuatro márgenes.

text(location, "text to place", pos, ...)
mtext("text to place", side, line=n, ...)Con la tecnología de

A continuación se describen las opciones más comunes.

Otras opciones habituales son cex, col y font (para el tamaño, el color y el estilo de letra, respectivamente).

Puntos de etiquetado

Puedes utilizar la función text( ) (ver más arriba) para etiquetar puntos, así como para añadir otras anotaciones de texto. Especifica la ubicación como un conjunto de coordenadas x, y y especifica el texto a colocar como un vector de etiquetas. Los vectores x, y y etiqueta deben tener todos la misma longitud.

# Example of labeling points
attach(mtcars)
plot(wt, mpg, main="Milage vs. Car Weight",
  xlab="Weight", ylab="Mileage", pch=18, col="blue")
text(wt, mpg, row.names(mtcars), cex=0.6, pos=4, col="red")Con la tecnología de

Anotaciones matemáticas

Puedes añadir fórmulas matemáticas a un gráfico utilizando reglas similares a las de TEX. Consulta help(plotmath) para más detalles y ejemplos.

Ejes

Puedes crear ejes personalizados utilizando la función axis( ).

axis(side, at=, labels=, pos=, lty=, col=, las=, tck=, ...)
Con la tecnología de

donde

Si vas a crear un eje personalizado, debes suprimir el eje generado automáticamente por tu función de trazado de alto nivel. La opción axes=FALSE suprime los ejes x e y. xaxt="n" y yaxt="n" suprimen los ejes x e y respectivamente. He aquí un ejemplo (algo exagerado).

# A Silly Axis Example

# specify the data
x <- c(1:10); y <- x; z <- 10/x

# create extra margin room on the right for an axis
par(mar=c(5, 4, 4, 8) + 0.1)

# plot x vs. y
plot(x, y,type="b", pch=21, col="red",
  yaxt="n", lty=3, xlab="", ylab="")

# add x vs. 1/x
lines(x, z, type="b", pch=22, col="blue", lty=2)

# draw an axis on the left
axis(2, at=x,labels=x, col.axis="red", las=2)

# draw an axis on the right, with smaller text and ticks
axis(4, at=z,labels=round(z,digits=2),
  col.axis="blue", las=2, cex.axis=0.7, tck=-.01)

# add a title for the right axis
mtext("y=1/x", side=4, line=3, cex.lab=1,las=2, col="blue")

# add a main title and bottom and left axis labels
title("An Example of Creative Axes", xlab="X values",
  ylab="Y=X")Con la tecnología de

Marcas menores

La función minor.tick( ) del paquete Hmisc añade marcas menores.

# Add minor tick marks
library(Hmisc)
minor.tick(nx=n, ny=n, tick.ratio=n)Con la tecnología de

nx es el número de marcas de graduación menores que se colocan entre las marcas de graduación mayores del eje x. ny hace lo mismo para el eje y. tick.ratio es el tamaño de la marca de graduación menor con respecto a la marca de graduación mayor. La longitud de la marca mayor se obtiene de par("tck").

Líneas de referencia

Añade líneas de referencia a un gráfico utilizando la función abline( ).

abline(h=yvalues, v=xvalues)Con la tecnología de

También se pueden especificar otros parámetros gráficos (como el tipo de línea, el color y la anchura) en la función abline( ).

# add solid horizontal lines at y=1,5,7
abline(h=c(1,5,7))
# add dashed blue verical lines at x = 1,3,5,7,9
abline(v=seq(1,10,2),lty=2,col="blue")Con la tecnología de

Nota: También puedes utilizar la función grid( ) para añadir líneas de referencia.

Leyenda

Añade una leyenda con la función legend().

legend(location, title, legend, ...)Common options are described below.Con la tecnología de

Otras opciones habituales de leyenda son bty para el tipo de caja, bg para el color de fondo, cex para el tamaño y text.col para el color del texto. Si configuras horiz=TRUE, la leyenda se ajustará horizontalmente en lugar de verticalmente.

# Legend Example
attach(mtcars)
boxplot(mpg~cyl, main="Milage by Car Weight",
  yaxt="n", xlab="Milage", horizontal=TRUE,
  col=terrain.colors(3))
legend("topright", inset=.05, title="Number of Cylinders",
  c("4","6","8"), fill=terrain.colors(3), horiz=TRUE)Con la tecnología de

Para más información sobre las leyendas, consulta help(legend). Los ejemplos de la ayuda son especialmente informativos.

Practicar

Prueba gratis el primer capítulo de este curso online de visualización de datos en R.

Este contenido ha sido extraído de statmethods.net.