R flexdashboard 與 shiny - 邊欄

Question

我正在嘗試使用格式與此頁面類似的 r 創建一個 flexdashboard。

我使用了帶有 Shiny 的 flexdashboard。

---
title: "title"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    vertical_layout: fill
runtime: shiny
---

```{r setup, include=FALSE}
library(flexdashboard)
library(lubridate)
library(viridis)
library(plotly)
library(tidytext)
library(readr)
library(tidyverse)
```

```{r global, include=FALSE}
# read global data
```

```{r wrangling-data}
```


Sidebar {.sidebar}
=====================================

```{r}
# shiny inputs defined here
```

Introduction
=====================================  

### Intro

```{r}
```

Data
=====================================     

```{r}
```

Conclusion
=====================================     

```{r}
```

這導致菜單項仍顯示在頂部導航欄上。

但是，我想將導航寶貝移動到左側， 就像這樣，並且還包括菜單項上的手風琴子菜單。

Answer 1

您必須添加一個級別（只是一系列破折號-- ）。 試試這個代碼：

---
title: "title"
output: 
    flexdashboard::flex_dashboard:
    orientation: columns
vertical_layout: fill
runtime: shiny
---

```{r setup, include=FALSE}
library(flexdashboard)
library(lubridate)
library(viridis)
library(plotly)
library(tidytext)
library(readr)
library(tidyverse)
```

```{r global, include=FALSE}
# read global data
```

```{r wrangling-data}
```


Sidebar {.sidebar}
=====================================

```{r}
# shiny inputs defined here

```
Some text added

-------------------------------------

Introduction
=====================================  

### Intro

```{r}
```

Data
=====================================     

```{r}
```

Conclusion
=====================================     

```{r}
```

希望能幫助到你。