키보드에서 값이 입력 될 때까지 스크립트를 중지 할 때

Question

나는 스크립트가 있는데 키보드 입력으로 시작한 다음이 변수에 입력 된 값을 기반으로 작업을 계속하려고하지만 y=readline("please enter a value")을 시도했지만 스크립트 값 입력을 기다리지 않고 그냥이 문장을 표시하고 계속 진행하십시오. 어떻게 할 수 있습니까 ??? 감사합니다. ?? -이 경우 모드 캐릭터의 벡터

print("please enter a value") 
y <- scan(file = "", what = "", nmax = 1) 

scan() 입력하는 사용자에 대한 대기 및 텍스트가 y에 저장됩니다 :

Answer 1

당신은 아마 scan(), 같은 것을 원한다.

Answer 2

매우 간단한 #! 스크립트는 foo()이라는 함수를 만듭니다.이 스크립트의 유일한 목적은 해당 인수 인 'bar'을 반향 출력하는 것입니다.

#! /home/gavin/R/2.13-patched/build/bin/Rscript --vanilla 
foo <- function(bar) { 
    writeLines(paste("You supplied the following information:", bar)) 
} 

## grab command arguments passed as -args 
args <- commandArgs(TRUE) 

## run foo 
foo(args) 

우리는 commandArgs() 기능을 사용하여 쉘 스크립트에 전달 된 모든 명령 줄 인수를 잡고, 다음 스크립트의 마지막 줄에 foo()에게 전달합니다.

foobar.R 파일에 해당 코드 비트가있는 경우 인수를 전달하고 Rscript 인터페이스를 사용하여 스크립트를 실행할 수 있습니다. 위의 실행 파일을 만들어야합니다 (chmod). 다음과 같이

그런 다음 스크립트가 같이 전화를 작동 할 수 있습니다 : 당신이해야 할 수도 있으므로

[gavin@desktop ~]$ ./foobar.R Cl 
You supplied the following information: Cl 

을하지만 같은 불행하게도 ?Rscript의 정보를주의 할, 표준 Windows cmd를 껍질, 스크립트와 같은 약 #!을 모르는 내가 보여주는 기능을 사용하기 위해 다른 쉘 (Cygwin 쉘이 도움이 될 것을 제안합니다)을 설치하십시오.

업데이트 :source() 및 readline()을 사용하십시오.

대안으로 비 대화식으로 실행하지 않고도 (즉, R GUI를 최소로 실행하고 한 줄의 코드 만 실행하지 않고) 스크립트를 source() 개만 실행하면됩니다. 당신이 할 전체 경로를 지정하지 않는 경우

R> source("barfoo.R") 
What column do you want to work on? Cl 
column was 'Cl' 

또는 예를 들어,이 스크립트 호출 barfoo.R에 있던 다음 R 구이 프롬프트에서 다음

dynamicwilcox <- function() { 
    ANSWER <- readline("What column do you want to work on? ") 
    if(ANSWER=="Ph") { 
     writeLines("column was 'Ph'") 
    } else if(ANSWER=="Cl") { 
     writeLines("column was 'Cl'") 
    } else { 
     writeLines(paste("Sorry, we don't know what to do with column", ANSWER)) 
    } 
    ANSWER ## return something 
} 

dynamicwilcox() 

, 우리는 할 수 이 :

R> source(file.choose()) 

readline()는 대화 형 R 세션에서 사용할 경우 잘 작동 정말 작업에 가장 적합한 도구입니다 -이 그것을 할 막달라 정확히 것입니다.

배치 모드에서 스크립트를 실행하지만 일부 입력을 제공하려는 전제는별로 의미가 없습니다. R은 배치 모드에서 실행될 때 스크립트가 자체 포함될 것으로 기대합니다. 당신은 그것을 깨닫지 못할 수도 있지만 스크립트를 더블 클릭하면 배치 모드로 실행됩니다.

Answer 3

우분투 (Windows가 아님)에서 동일한 문제가 발생하여 해결책을 찾았습니다.

Rscript 대신 littler (/usr/bin/r)를 사용하고 littler에 대화식 플래그 -i을 전달해야합니다. 내가 스크립트로 실행하면

#!/usr/bin/r -vi 

eprintf <- function(...) cat(sprintf(...), sep='', file=stderr()) 

prompt.read <- function(prompt="\n[hit enter to continue]: ") { 
    eprintf("%s", prompt) 
    invisible(readline()) 
} 

ans <- prompt.read('Please enter a value: ') 
eprintf("You have entered: '%s'\n", ans) 

# rest of script comes here... 

, 내가 얻을 :

$ ./rl.r 
Please enter a value: 42 
You have entered: '42' 

$ ./rl.r 
Please enter a value: Hello to you! 
You have entered: 'Hello to you!' 

이 (우분투)의 littler를 설치하려면 :

이 조합은 스크립트에서 원하는대로 일을 readline()을 설득 관리

sudo apt-get install littler