如何在 R Shiny 应用程序中左对齐乳胶方程？

Question

我正在开发一款闪亮的应用程序。我使用 withMathJax() 插入了一个等式。我想左对齐方程并将字体更改为 "Arial"。有人可以帮忙吗？

下面是示例问题：

library(shiny)


ui  <- fluidPage(
  titlePanel("hello"),
  sidebarLayout(
    sidebarPanel(),
    mainPanel(
      uiOutput("formula")
    )
  )
)

server <- function(input,output){
   output$formula <- renderUI({
    listcat <- c("Men","Ladies")
   value <- 15
    withMathJax(paste0("$$\frac{",listcat[1], "\cap ", listcat[2],"}{",listcat[1],"} =", value,"$$"))
  })
}

Answer 1

可以用CSS对齐公式：

div.MathJax_Display{
   text-align: left !important;
}

注意：使用!important保证参数不被覆盖

然后使用

tags$head(tags$style(HTML("...")))

将其插入闪亮的应用程序。

可重现的例子：

library(shiny)

ui <- fluidPage(
  titlePanel("hello"),
  tags$head(
    tags$style(HTML("
                    div.MathJax_Display{
                    text-align: left !important;
                    }
  "))
  ),
  sidebarLayout(
    sidebarPanel(),
    mainPanel(
      uiOutput("formula")
    )
  )
)

server <- function(input,output){
  output$formula <- renderUI({
    listcat <- c("Men","Ladies")
    value <- 15
    withMathJax(paste0("$$\frac{",listcat[1], "\cap ", listcat[2],"}{",listcat[1],"} =", value,"$$"))
  })
} 

shinyApp(ui, server)

请注意，MathJax 不支持 Arial，请参阅此处：http://docs.mathjax.org/en/latest/font-support.html。

如何在 R Shiny 应用程序中左对齐乳胶方程？

How to left align latex equation in R Shiny app?

css

r

mathjax

shiny