如何在R控制台中获得用户输入

Question

如何从终端获取用户输入？ 我在记事本中编写了我的R程序，然后将其复制到R Console中运行。我的程序需要用户输入。 如果我使用readline，它不会暂停用户输入，但会选择以下行代码＆＃39;作为回应。 与猫或猫相似扫描它们是在函数内还是在内部使用。 示例:( xxread1：4用于停止程序产生错误）

read_message=function()
   {xx<-readline('does it appear? ')}
readkey <- function()
   {cat("[press [enter] to continue]")
     number <- scan(n=1,what='character')}
x=read_message()
xrread1='1'
x=readline(prompt='Is it real? ')
xrread2='2'
gh=readkey()
xrread3='3'             
cat("[enter field]")
number <- scan(n=1,what='character')
xrread4='4'
number

我知道这看起来不像有效的代码，但运行它 - 它可以工作但是 不会暂停用户输入，读取的结果等是以下数字。 那么如何获得用户输入？

Answer 1

解决： 您必须获取整个程序 - 将其保存为文件名，然后保存在R控制台

中

source(filename)

我曾尝试过将这些功能整合起来，然后将其余部分复制/粘贴到R控制台中 - 这不起作用，它必须是整个程序（据我所知）。