Flexdashboard с 4 стеками - PullRequest
Новая
       61

Flexdashboard с 4 стеками

0 голосов
/ 05 февраля 2019

Простой вопрос: как мне создать flexdashboard с 4 (или более) диаграммами в стеке диаграмм в одном столбце.

Документация намекает на то, что это должно быть возможно.

Я думал, что это будет так просто: 

---
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 голосов
/ 06 февраля 2019

Все, что вам нужно сделать, это вставить абзац вместо 

```
### Fourth Row

use 

```

### Fourth Row
...