Rmarkdown пароль с помощью getPass

Question

Я создаю приложение в RMarkdown, основанное на сгенерированном пользователем пароле:

library(getPass)

pw <- getPass(msg = "Enter the Password, please!")

Когда я запускаю весь код в интерактивном режиме в консоли R, функция getPass приостанавливает выполнение кода и предоставляет всплывающее окно, в котором пользователь может ввести пароль.

Однако при включении этого кода в RMarkdown процесс вязания не останавливает работу getPass. В результате код запускается без пароля. В этом случае приложение не может подключиться к защищенной паролем базе данных.

У кого-нибудь из вас есть рекомендации по решению этой проблемы? Я искал похожие вопросы, но если это дубликат, то мои извинения. Спасибо!

Answer 1

Как указано в комментарии, используйте параметризованный отчет.

Ваш rmarkdown должен выглядеть так:

---
output: html_document
params:
  pwd:
    label: "Enter the Password, please!"
    value: ""
    input: password
---

Your password is `r params$pwd`

Теперь либо беги

rmarkdown::render("test.Rmd", params="ask")

или воспользуйтесь кнопкой RStudio "Knitr с параметрами":