r在mathjax条件案例中闪闪发光

我想这就是你想要的还是?

library(shiny)

ui <- {fluidPage(
  title = 'MathJax Examples',
  withMathJax(),
  uiOutput('ex4')
  )}

server <- function(input, output, session) {
  output$ex4 <- renderUI({
    withMathJax(
      helpText('$$f(n)=\\begin{cases}
               n/2,  & \\text{if $n$ is even} \\\\
               3n+1, & \\text{if $n$ is odd}
               \\end{cases}\\!$$'))
  })
}
shinyApp(ui, server)

how to acheive conditional output based on tab selection in shiny app

我认为上面的链接可以给你一个很好的信息,如何写有条件的情况。它还有一个链接,里面有一个应用条件案例的适当教程,希望对你有帮助。