Shiny의 Markdown에 공식을 추가 할 때의 문제

Question

일부 수식이 포함 된 tabPanel에 텍스트를 추가하고 싶습니다. UI는 다음과 같습니다

library(markdown) 
library(shiny) 

shinyUI(fluidPage(
    titlePanel("Test"), 
     sidebarLayout(
     sidebarPanel(
     ), 

    mainPanel(
     tabsetPanel(
     tabPanel('Text', includeMarkdown("post.rmd")) 
     ) 

    ) 
    ) 
) 
) 

그리고 가격 인하 파일은 다음과 같다 : 싶었지만 같은 위와 같이 한테 문자로

This is a text test. 

### Equations 
There are inline equations such as $y_i = \alpha + \beta x_i + e_i$. 

And displayed formulas: 

$$\frac{1}{1+\exp(-x)}$$ 

내가 이것을 실행 , 나는 공식을하지 않습니다. here

에서 지시를 따르고 형식을 .md로 변경했지만 작동하지 않았습니다. 내가 도대체 ​​뭘 잘못하고있는 겁니까?

Answer 1

링크 된 토론에는 rmarkdown 파일 렌더링에 대한 설명이 나와 있습니다. R 반짝 이는 markdown 파일을 html로 자동 렌더링하지 않으므로 다음을 추가해야합니다 : rmarkdown::render("post.Rmd"). 당신은 또한 단지 코드를 사용 HTML로 사전에 가격 인하 파일을 컴파일하고 그 경우에 includeHtml을 사용할 수 있습니다 : 첫 번째 솔루션으로 내가 여전히``얻을 수 있지만, includeHTML(("post.html"))

library(markdown) 
library(shiny) 
server <- function(input, output) { 

} 

ui <- shinyUI(fluidPage(
    sidebarLayout(
    sidebarPanel(

    ), 
    mainPanel(
      tabsetPanel(
     tabPanel('Text', includeMarkdown(rmarkdown::render("post.rmd"))) 
     ) 

    ) 
) 
)) 

shinyApp(ui = ui, server = server)