getGraphicsEvent для чтения клавиатуры для неинтерактивного сеанса

В более старых версиях R, в любом случае версии 2.9, я мог запускать программу R из пакета с помощью rterm.exe и создавать графическое окно, которое пользователь мог прокручивать назад и вперед и просматривать графики. Я смог сделать это с помощью некоторого кода R, например:

 kbd <- function(key) { 
 if (key == "q") { "Quit" } else NULL } 
 getGraphicsEvent(" ",  onKeybd = kbd) 

Это удерживало средство просмотра графики открытым, пока пользователь не нажал клавишу «q». В более новых версиях R кажется, что, поскольку это запускается из пакета (не интерактивно с использованием Rterm.exe), значение ключа всегда равно NULL, а графическое окно просто мигает и закрывается. Мой вопрос: есть ли способ каким-то образом убедить систему R в том, что я запускаю квазиинтерактивный сеанс, и заставить getGraphicsEvent не возвращать NULL немедленно?