读取用户输入而不回显

Question

我想知道是否有一种方法可以从 STDIN 读取用户输入，而无需将其回显到 R 中的屏幕。我知道 readline()、readLines() 和 scan() 可以从键盘读取用户输入，但似乎都没有不回显的选项。

正如您所料，这是为了获取密码。所以我正在寻找能让我做的事情:

> a<-get_password()
Password:
> a
[1] "password"

Answer 1

操作系统是什么？如果您可以从终端运行它，那么这应该可以工作。

get_password <- function() {
cat("Password: ")
system("stty -echo")
a <- readline()
system("stty echo")
cat("\n")
return(a)
}

> a <- get_password()
Password: 
> a
[1] "sdfs"
> 

这适用于使用 Terminal.app 中的 R 的 OS X，但不适用于 R.app。不知道 Windows 解决方案，因为似乎没有 native R 解决方案。