动态增加flexdashboards中的选项卡和页面数量

时间:2016-09-14 15:31:15

标签: r flexdashboard

所以我刚开始使用flexdashboard来显示我的结果,我有一个关键问题。在我的程序中,我有一个10列的数据集,每天更新。在一天结束时,我只报告了重要的列。

事情是,在某些日子里,我需要报告2列,以及其他10列。所以我想在flexdashboard中实现自动化。

使用我们执行的标签定义新行(例如2个标签)

Row {.tabset .tabset-fade}
-----------------------------------------------------------------------

### Chart A
```{r}
one <- my_visualization function(data[,1])
```

### Chart B
```{r}
two <-  my_visualization function(data[,2])
```

这会创建一个包含两个标签的行。

我的问题是:有没有办法生成尽可能多的标签,如变量c所示? (比如c=4,我想要4个标签!)

很抱歉,如果之前已经回复过!提前谢谢!

1 个答案:

答案 0 :(得分:0)

诀窍是使用cat函数。下面是一个大纲。本质上它是一个for循环与当天的情节包含两个'猫'调用。此方法允许生成变量选项卡编号。通过添加{.tabset},当有许多图时,这将使显示更整洁,而不是生成长文档。 '\ n'对于创建新行至关重要,否则主题标签不起作用。

希望你已经找到了。只是为别人添加这个。

    # todays results (.tabset})

    ```{r}

    rlist <- c(columns to plot)

    for (r in rlist) {


      cat(paste0('## ', r, '\n'))


     # insert your plot

      cat'\n\n')

    }

    ````