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.
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))
También te puede interesar