에서 강력한 readline 스크립트 만들기

Question

내 R 스크립트는 작동 가능하지만 단축키 ctrl + alt + r (RStudio)을 사용하여 R 스크립트 파일에서 실행할 때만 작동하기 때문에 강력하지는 않습니다. ctrl + a를 누른 다음 ctrl + Enter를 사용하여 적절히 실행하십시오.

어떤 방식 으로든 작동하도록 스크립트를보다 강력하게 만들 수 있습니까?

enterval <- function() { 
    fNumGlobal <<- (readline("Please choose a file to analyze: ")) 
} 

fNumGlobal = -1 
enterval() 
(fNumGlobal) 

후자의 경우 이처럼 사용자 입력을 수행하지 못하는 라인을 반환합니다.

Please choose a file to analyze: (fNumGlobal) 

Answer 1

{ 
enterval <- function() { 
    fNumGlobal <<- (readline("Please choose a file to analyze: ")) 
} 

fNumGlobal = -1 
enterval() 
(fNumGlobal) 
} 

로 코드의 둘레에 괄호 넣기는 전체 스크립트가 콘솔 창에 전달 될 때까지 그 어느 것도 실행되지 않음을 의미하므로 코드의 다음 줄에 대한 가능성은 없다 readline에 대한 입력으로 해석됩니다.