readline()은 프롬프트에서 변수에 저장된 문자열을 사용합니다. - R

Question

readline() 함수가 변수에 사용 된 단어를 문자열로 변환하지 않고 변수에 저장된 문자열을 사용하고 싶습니다. 내가 할 수있는 방법이 있니?

Enter Season Color: WinterC 
> x <- as.character(unlist(strsplit(x, ","))) 

> x 
"Blue" "White" "Purple" "Grey" 

오히려 실제로 일어나는 것보다 : 일어날 것이 경우 내가하고 싶은이에서

> SpringC = c("Red", "Orange", "Yellow", "Green") 
> WinterC = c("Blue", "White", "Purple", "Grey") 
> x <- readline("Enter Season Color: ") 

: 예를 들어

, 나는 다음과 같은 변수와 원하는 메시지를 가지고 말 :

Enter Season Color: WinterC 
> x <- as.character(unlist(strsplit(x, ","))) 

> x 
"WinterC" 

Answer 1

사용자 정의 기능으로 수행 할 수있는 작업입니다. 이런 식으로 뭔가 :

#define the function 
readline_2 <- function() { 

    x <- readline("Enter Season Color: ") 
    eval(parse(text = x)) 

} 

사용 :

> b <- readline_2() 
Enter Season Color: WinterC 
> b 
[1] "Blue" "White" "Purple" "Grey" 

Answer 2

당신이 그렇지 않으면 당신이 get()를 사용할 수있는 별도의 한다거나 할

options <- list(
    SpringC = c("Red", "Orange", "Yellow", "Green"), 
    WinterC = c("Blue", "White", "Purple", "Grey") 
) 
x <- readline("Enter Season Color: ") 
x <- options[[x]] 

을 대신 목록에서 관련 값을 저장하는 경우이 쉬울 것 검색 할 변수 이름의 문자열 값이지만 이전 솔루션을 강력히 권장합니다.