R中的用户输入

时间:2014-04-07 07:39:04

标签: r function user-input readline

我正在尝试运行R脚本,在Windows命令提示符下使用Rscript并询问用户的输入。

到目前为止,我已经找到了如何在R的交互式shell中实现类似内容的答案。 readline()scan()似乎无法用于命令提示符。

示例:

我有一个多项式y=cX,其中X可以使用多个值X1X2X3等等。 C变量是已知的,因此我需要计算y的值是向用户询问Xi值并将其存储在我的脚本中。

下面的脚本什么都不做。

UIinput <- function(){

    #Ask for user input
    x <- readline(prompt = "Enter X1 value: ")

    #Return
    return(x)
}

下面的第二个例子只是提示信息然后结束。

FUN <- function(x) {

    if (missing(x)) {
        message("Uhh you forgot to eneter x...\nPlease enter it now.")
        x <- readLines(n = 1)
    }
    x
}
FUN()

控制台输出:

Uhh you forgot to eneter x...
Please enter it now.
character(0)

有什么建议吗?

提前致谢

1 个答案:

答案 0 :(得分:3)

cat("input x: ")
x <- readLines(con="stdin", 1)
cat(x, "\n")