R Shiny 用 katex 排列单选按钮

【问题标题】：R Shiny lining up radio buttons with katexR Shiny 用 katex 排列单选按钮
【发布时间】：2017-10-24 14:37:45
【问题描述】：

在 Shiny 中使用单选按钮选择模型。模型由使用 katex 的公式定义。有没有办法将 katex 插入到按钮的选择中？

我尝试过 this approach，但不适用于 katex：

radioButtons_withHTML("my_model", label = h4("Choose model"),
    choices = list(
                   HTML(katex("y = (ax^\\nu + b)^{-1}")) = 1, 
                   "Exponential" = 2), 
    selected = 1)

目前，公式位于未排列的单选按钮旁边。

【问题讨论】：

标签： shiny katex

【解决方案1】：

您可以在choiceNames 参数中使用HTML，如下所示：

library(shiny)
    ui <- fluidPage(

      radioButtons("my_model", label = h4("Choose model"),
      choiceNames = list(tags$span(HTML("y = (ax<sup>&nu;</sup> + b)<sup>-1</sup>")),
                         tags$span(HTML("y = (e<sup>ax</sup> + &nu;e<sup>bx</sup>)<sup>-1</sup>"))
                         ), 
      choiceValues = c(1,2), selected = 1)

    )

    server <- shinyServer(function(input, output) {
    })

    shinyApp(ui = ui, server = server)

这样你会得到如下所示的输出：

【讨论】：