Como esperar por um pressionamento de tecla no R?

Quero pausar meu script R até que o usuário pressione uma tecla. Como eu faço