Блестящий динамический интерфейс от Markdown

Question

Я пытаюсь загрузить и отобразить в приложении Shiny серию математических упражнений, написанных на уценке. Давайте возьмем 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 два динамических элемента пользовательского интерфейса созданы правильно. Но только у первого есть контент.

Вы все получаете одинаковый результат? Если да, что я делаю не так?