Question

我正在尝试使用Rmarkdown文档中的标签和图表。但我似乎无法在第二个标签中显示该情节。有关示例，请参阅附带的示例代码。如果我删除{.tabset}，那么一切都会正常显示。

我认为如果我可以在切换标签时强制刷新应用内的刷新，这可能会有所帮助，但我无法弄清楚如何做到这一点。

---
title: "Test"
output:
  html_document:
    toc: true
    theme: united
runtime: shiny
---

# Main Page {.tabset}

## Page 1
```{r, echo=FALSE}
require(plotly)
require(dplyr)
shinyApp(
ui = fluidPage(
   titlePanel("Page 1"),
   mainPanel(fluidRow(plotlyOutput("plot"))
   )),
server = function(input, output) {
   output$plot = renderPlotly({
      data.frame(x=seq(1,10)) %>% mutate(y=2*x) %>% plot_ly(x=x, y=y, mode="markers+lines")
   })
},
options=list(height=500)
)
```

## Page 2
```{r, echo=FALSE}
shinyApp(
ui = fluidPage(
   titlePanel("Page 2"),
   mainPanel(fluidRow(plotlyOutput("plot"))
   )),
server = function(input, output) {
   output$plot = renderPlotly({
      data.frame(x=seq(1,5)) %>% mutate(y=3*x-2) %>% plot_ly(x=x, y=y, mode="markers+lines")
   })
},
options=list(height=500)
)
```

没有在Rmarkdown标签中显示的闪亮情节

0 个答案: