2015-05-11 15 views
8

Chcę wyświetlić sformatowaną formułę -LaTeX w panelu Shiny, ale nie mogę znaleźć sposobu na połączenie textOutput z withMathJax. Próbowałem następujące, ale nie działa. Każda pomoc będzie wdzięcznie doceniona.Formuła LaTeX w panelu Shiny

--ui.r

... 
    tabPanel("Diagnostics", h4(textOutput("diagTitle")), 
withMathJax(textOutput("formula")), 
), 
... 

--server.r

... 
output$formula <- renderText({ 
    print(paste0("Use this formula: $$\\hat{A}_{\\small{\\textrm{M€}}} =", my_calculated_value,"$$")) 
}) 
... 
+0

dziwne, że prowadzone grzywny jak na moim komputerze (I właśnie usunął 'print' ale nie należy zmieniać dużo). Mam jednak shiny_0.11.1. Czy jest to plik skryptu: '

1

ui.R

tabPanel("Diagnostics", h4(textOutput("diagTitle")), 
    withMathJax(uiOutput("formula")), 
) 

server.R

output$formula <- renderUI({ 
    return(HTML(paste0("<p>,"Use this formula: $$\\hat{A}_{\\small{\\textrm{M€}}} =", my_calculated_value,"$$","</p>"))) 
}) 
+0

Dane wyjściowe są nadal takie: Użyj tej formuły: $$ \ hat {A} _ {\ small {\ textrm {M €}}} = 1.69 $$ –

0

Użyj po uiOutput po stronie interfejsu użytkownika i renderUI po stronie serwera dla zawartości dynamicznej.

ui <- fluidPage(
    withMathJax(), 
    tabPanel(
    title = "Diagnostics", 
    h4(textOutput("diagTitle")), 
    uiOutput("formula") 
) 
) 

server <- function(input, output, session){ 
    output$formula <- renderUI({ 
    my_calculated_value <- 5 
    withMathJax(paste0("Use this formula: $$\\hat{A}_{\\small{\\textrm{M€}}} =", my_calculated_value,"$$")) 
    }) 
} 

shinyApp(ui, server) 

Więcej przykładów: http://shiny.leg.ufpr.br/daniel/019-mathjax/