如何讓r腳本等待鼠標單擊？

我有我的命令行（c:\path\foo> r --ess --slave -q -f myScript.R）執行這個簡單的腳本：如何讓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到控制檯，然後退出。

所以，我將如何去等待用戶點擊進入圖像進一步進行？

雖然我直到用戶用鼠標點擊沒有找到一個答案，使腳本等待，至少我可以等他按下控制檯上輸入：

readLines('stdin', n=1)

2016-12-08 21:05:48

回答