在R中使用Locator（）时放大和缩小

Question

我有许多点的XY散点图，这些点定义了灯丝般的结构（想象看着放在地上的一堆木棍，这些是这些图的样子）。我正在使用Locator来识别每根灯丝的开始和结束。我得到的最终结果是由XY中的两个点定义的线段表。

我的代码的简化基本版本运行如下：

n=1
NumberOfFilaments=5
Xdata=rnorm(1000,mean=500,sd=100)
Ydata=rnorm(1000,mean=500,sd=100)
clicks.table=c()     

while (n<=NumberOfFilaments) {
  plot (Xdata,Ydata)
  clicks = locator(2)
  A = c(clicks$x[1],clicks$y[1])
  B = c(clicks$x[2],clicks$y[2])
  clickpoints = c(A,B)
  clicks.table = rbind(clicks.table,clickpoints)
  n=n+1
}

我的一些数据集在X＆amp; amp;的数据总宽度方面变得非常大。 Y与我试图点击的细丝长度相比较。这使我很难准确地点击灯丝的开始和结束。我想要做的是放大绘图以查看单个灯丝，单击两个点然后缩小以再次查看整个桩。如果重要的话，我通常会使用R studio。提前谢谢。