CAPÍTULO 6. GRAFICACIÓN CON R
168
Figura 6.23: Tres dispositivos gráficos abiertos simultáneamente
x11
()
# <-DISPOSITIVO GRÁFICO NUM 4
# Los puntos de la primera función 'y'
plot
(x,y,
pch
=
15
,
col
=
"red"
)
# Los puntos de la segunda función 'y1'
points
(x,y1)
# Segmentos de línea entre los puntos
# correspondientes a 'y' y los
# correspondientes a 'y1'
segments
(x, y, x, y1,
col
=
colors
()[
99
])
# La curva de referencia
curve
(sin,
add
=T,
lwd
=
3
,
col
=
"navyblue"
)
Las tres ventanas resultantes de todo el código anterior se muestran en la
Fig. 6.23. Nótense ahí los identificadores que aparecen en el título de cada ven-
tana.
Para terminar, supóngase que se desea enviar el último gráfico, contenido
en el dispositivo 4, a un archivo gráfico de tipo PDF. Esta operación se pue-
de hacer mediante una copia con la función
dev.copy()
, como se muestra a
continuación.
# Primeramente se abre el dispositivo, que,
# ahora viene a ser el actual
pdf
(
"miArch.pdf"
)
# .. entonces nos regresamos al anterior que es
# el que contiene el material gráfico que nos
# interesa copiar
dev.set
(
dev.prev
())
# Se hace la copia. Nótese que, en este caso,
# dev.copy() copia por default al dispositivo
# siguiente del actual.
dev.copy
()
