Zoom
Dados dos vectores de la misma longitud es posible crear un gráfico de dispersión con la función plot como en el ejemplo siguiente.
# Datos
set.seed(1)
x <- runif(400)
y <- runif(400)
# Gráfico de dispersión
plot(x, y)
Si quieres hacer zoom a un área específica del gráfico puedes hacer uso de la función zoomInPlot de la librería plotrix. Esta función permitirá resaltar el área correspondiente en el gráfico y crear un nuevo gráfico fuera del primero con los datos ampliados. Tan solo necesitas especificar los límites de los ejes X e Y para el gráfico aumentado con rxlim y rylim, respectivamente.
# install.packages("plotrix")
library(plotrix)
# Datos
set.seed(1)
x <- runif(400)
y <- runif(400)
# Gráfico de dispersión con zoom
zoomInPlot(x, y, # Datos
rxlim = c(0.6, 0.8), # Límites del eje X
rylim = c(0.4, 0.6)) # Límites del eje Y
Ten en cuenta que las proporciones de los gráficos dependen del tamaño de la ventana gráfica. Si incrementas el tamaño del gráfico o modificas los márgenes es posible obtener gráficos cuadrados como el de la primera figura.
Personalización del gráfico
También puedes cambiar el símbolo de los puntos de los gráficos, así como su color y especificar argumentos adicionales de la función plot dentro de zoomInPlot. Además, hay un argumento llamado zoomtitle que puede ser usado para agregar un título al gráfico aumentado.
# install.packages("plotrix")
library(plotrix)
# Datos
set.seed(1)
x <- runif(400)
y <- runif(400)
# Gráfico de dispersión con zoom
zoomInPlot(x, y, # Datos
pch = 19, # Símbolo
col = 4, # Color
zoomtitle = "Zoom gráfico", # Título
rxlim = c(0.6, 0.8),
rylim = c(0.4, 0.6))
