如何在R控制檯中獲得用戶輸入

Question

如何從終端獲取用戶輸入？ 我在記事本中寫入R程序，然後將其複製到R控制檯中運行。我的程序需要用戶輸入。 如果我使用readline，它不會暫停用戶輸入，但會提取下面一行'code'作爲其響應。 與貓或貓&相似，請掃描它們是在函數內還是在線內使用。 例子：（該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

解決： 你要採購整個程序 - 它保存到一個文件名，然後在

source(filename) 

我曾試圖剛剛採購的功能，然後複製/粘貼，其餘爲R控制檯 - [R控制檯 - - 這不起作用，它必須是整個程序（據我發現）。