如何让 r 脚本等待鼠标单击？

Question

我有一个从命令行 (c:\path\foo> r --ess --slave -q -f myScript.R) 执行的简单脚本：

library(ggmap)

x11()
qmap('Hauptbahnhof Zürich', zoom=18, source='osm')

我希望脚本等到用户用鼠标单击进入图像。这个版本刚刚退出。

我尝试使用 z <- locator(1)，但这给了我一个 Error in locator(1) : plot.new has not been called yet Execution halted 错误。

我也试过了

getGraphicsEvent(
    prompt      = "Waiting for input", 
    onMouseDown = NULL,
    onMouseMove = NULL,
    onMouseUp   = NULL, 
    onKeybd     = NULL)

然而，这种方法只是将 NULL 打印到控制台然后退出。

那么，我该如何等待用户点击进入图片以继续下一步呢？

Answer 1

虽然我没有找到让脚本等到用户点击鼠标的答案，但至少我可以等他在控制台上按回车键：

readLines('stdin', n=1)

如何让 r 脚本等待鼠标单击？

How do I make an r-script wait for a mouse click?

r

mouseevent

wait