r - 从终端安全地向 R 应用程序提供密码的方法？

Question

R 是否有允许用户安全地提供密码的功能，例如 Python 的 getpass模块？

(见 http://docs.python.org/library/getpass.html 我的意思的一个例子)

Answer 1

终端安全密码问题的非常简单的 linux 概念:

   password <- function(prompt = "Password:"){
      cat(prompt)
      pass <- system('stty -echo && read ff && stty echo && echo $ff && ff=""',
                        intern=TRUE)
      cat('\n')
      invisible(pass)
   }