r - 交互式 R 图

Question

我有一个 R 图，我希望用户能够点击图表上的一个点，我想知道他们点击了哪里。有点像鼠标监听器。我正在使用 RStudio。这有可能吗？基本上，对于他们点击的某个点，我想显示另一个图，其中包含有关该点的更多详细信息。

这是我所拥有的:

data <- data.frame(x=c(1,2,3,4,5),y=c(1,2,3,4,5))
x11()
plot(data)

loc <- locator(n=1)
if(loc$x > 2) {
  x11()
  plot(c(1,2,3),c(5,6,7))
}

loc <- locator(n=1)
if(loc$x > 2) {
  x11()
  plot(c(4,5,6),c(5,6,7))
}

因此，出现的第一个图有 5 个数据点。如果用户点击超过 2 的 x 值，那么我想打开另一个绘图，绘制您看到的列出的数据点(3 个数据点)。然后，如果他们关闭该图并再次点击原始的 5 数据点图上的 2，那么我希望它打开一个新图，其中包含您在第二个 if 语句中看到的 3 个数据点。

但它给我带来了错误和 I/O 问题。

Answer 1

(我知道这不是一个完整的答案，但它的格式不能很好地作为评论。)要使特定设备成为事件设备，您需要确定其编号。执行您的代码后，我可以获得我的设备列表并将第一个 X11 设备设置为当前设备

dev.list()
#quartz    X11 quartz    X11    X11 
#     2      3      4      5      6 
dev.set(3)
#X11 
#  3 

那么试试这个:

x11() ; first.ID <- dev.cur()
plot(data)

loc <- locator(n=1)
if(loc$x > 2) {
  x11() ; second.ID <- dev.cur()
  plot(c(1,2,3),c(5,6,7))
}
dev.set(first.ID)
loc <- locator(n=1)
if(loc$x > 2) {
  x11() ; third.ID <- dev.cur()
  plot(c(4,5,6),c(5,6,7))
}

在我的机器上，您还需要单击第一个图形窗口的标题来显示它，因为 Mac Gui 不会将事件设备带到前台。