r - 从 Markdown 呈现的闪亮动态 UI

Question

我正在尝试在 Shiny 应用程序中加载和呈现一系列用 Markdown 编写的数学练习。让我们以 2 个练习为例。ex1.Rmd看起来像这样：

A formula: $x^2=x\times{}x$.

...ex2.Rmd像这样：

A different formula: $x^3=x^2\times{}x$.

当我运行以下应用程序时：

exercices  <- c('ex1', 'ex2')
for(e in exercices) render(
  input         = paste0(e, '.Rmd'),
  output_format = html_document()
)

shinyApp(
  ui     = shinyUI(htmlOutput('exercices')),
  server = shinyServer(function(input, output) {

    output$exercices <- renderUI({
      lapply(exercices, htmlOutput, class='exercice')
    })

    for(e in exercices) local({
      output[[e]] <- renderUI(
        withMathJax(includeHTML(paste0(e, '.html')))
      )
    })

  })

)

...我只得到第一个公式。但是，在 HTML 结构中，两个动态 UI 元素已正确创建。但只有第一个有内容。

你们都得到相同的结果吗？如果是，我做错了什么？