具有4个图表堆栈的flexdashboard

时间:2019-02-05 02:09:23

标签: r knitr flexdashboard

一个简单的问题:我如何在一列图表堆栈中创建包含4个(或更多)图表的flexdashboard

文档暗示应该可行。

我认为这很简单:

---
title: "Dygraphs Linked Time Series"
output: 
  flexdashboard::flex_dashboard:
    orientation: columns
    social: menu
    source_code: embed
---

```{r setup, include=FALSE}
library(dygraphs)
library(quantmod)
library(flexdashboard)

getSymbols(c("MSFT", "HPQ", "INTC"), from = "2014-01-01", auto.assign=TRUE)
```

### Microsoft

```{r}
dygraph(MSFT[,2:4], group = "stocks") %>% 
  dySeries(c("MSFT.Low", "MSFT.Close", "MSFT.High"), label = "MSFT")
```

### HP

```{r}
dygraph(HPQ[,2:4], group = "stocks") %>% 
  dySeries(c("HPQ.Low", "HPQ.Close", "HPQ.High"), label = "HPQ")
```

### Intel

```{r}
dygraph(INTC[,2:4], group = "stocks") %>% 
  dySeries(c("INTC.Low", "INTC.Close", "INTC.High"), label = "INTC")
```
### Fourth Row

```{r}
dygraph(INTC[,2:4], group = "stocks") %>% 
  dySeries(c("INTC.Low", "INTC.Close", "INTC.High"), label = "INTC")
```

1 个答案:

答案 0 :(得分:0)

您所要做的就是在之间插入一段 代替

```
### Fourth Row

使用

```

### Fourth Row