使用来自 YAML 标头的参数和闪亮的运行时 Rmd

Question

我想使用params 传递闪亮应用的设置。考虑以下文档，该文档仅在复选框更改时打印一条消息。我希望可以在 yaml 标头中使用 params 配置消息。

但是，这似乎失败了，因为 params 似乎仅在呈现文档时可用（请注意，它在文档本身中正确打印了消息）。它是否正确？有没有办法在运行时读取params？这在任何地方都有记录吗？

文档如下：

---
title: "Test"
output: html_document
runtime: shiny
params:
  message: "hi"
---

Can see this: `r params$message`

```{r eruptions, echo=FALSE}
shiny::checkboxInput("cb","Checkbox")
```

```{r, echo=FALSE}
observeEvent(input$cb, {
  # This works
  message("clicked")
  # This fails:
  # Error in message(params$message) : object 'params' not found
  try(message(params$message))
})
```

Answer 1

这可以通过将params 设置为非局部变量来实现：

---
title: "Test"
output: html_document
runtime: shiny
params:
  message: "hi"
---

```{r}
params <<- params
```
......