R에서 한줄 읽기 (readline)

R에서 한 줄 읽어 문자열로 변환하는 함수가 있다. readline() 이지, readLine() 이 아니다.. (;;;)

예제 1

> readline("Do you like coffee?")

Do you like coffee?n

[1] "n"

예제 2

fun <- function() {

  ANSWER <- readline("Do you like coffe? ")

  if (substr(ANSWER, 1, 1) == "y")

    cat("YOU LIED!\n")

  else

    cat("YOU LIED NOT!\n")

}

if(interactive()) fun()

결과 화면

Do you like coffe? y

YOU LIED!