【问题标题】:rmarkdown - define header with {.tabset} option dynamically inside loop?rmarkdown - 在循环内动态定义带有 {.tabset} 选项的标题?
【发布时间】:2019-08-01 17:45:34
【问题描述】:

四处搜索,没有找到这个问题的答案。基本上,我想遍历一个字符串向量,并为每个字符串使其成为一个标题,其下方有一个标签集。

---
title: "report"
output:
  html_document:
    toc: yes
    toc_depth: '4'
    toc_float: true
---

```{r}
headers <- c("membership", "participation")
tabs <- c("age", "gender")

for (i in headers){

    cat("###", i, "{.tabset}", "<br>", "\n")
    cat("\n", "<br>", "\n\n")

    for (j in tabs) {

        cat("####", j, "<br>", "\n")
        cat("\n", "<br>", "\n\n") 
    }
} 
```

创建:

而不是:

创建者:

---
title: "report"
output:
  html_document:
    toc: yes
    toc_depth: '4'
    toc_float: true
---

### membership {.tabset}
```{r results='asis', echo = F}
tabs <- c("age", "gender")

for (j in tabs) {

        cat("####", j, "<br>", "\n")
        cat("\n", "<br>", "\n\n") 
    }

```

### participation {.tabset}
```{r results='asis', echo = F}

for (j in tabs) {

        cat("####", j, "<br>", "\n")
        cat("\n", "<br>", "\n\n") 
    }

```

例如,硬编码启动 {.tabset} 的标头。是否可以在 rmarkdown 的循环中创建一个启动选项卡集的标头?

【问题讨论】:

    标签: r r-markdown


    【解决方案1】:

    很高兴见到你,paqmo

    我建议您在选项上使用results = 'asis' 并在代码中删除&lt;br&gt;。

    ```{r, echo = FALSE, results='asis'}
    headers <- c("membership", "participation")
    tabs <- c("age", "gender")
    
    for (i in headers){
    
        cat("###", i, "{.tabset}", "\n")
        cat("\n\n\n")
    
        for (j in tabs) {
    
            cat("####", j, "\n")
            cat("\n\n\n") 
        }
    } ```
    

    结果如下图所示

    【讨论】:

      猜你喜欢
      • 1970-01-01
      • 2018-10-14
      • 2021-12-13
      • 2022-11-10
      • 1970-01-01
      • 1970-01-01
      • 2018-01-27
      • 2017-10-11
      • 1970-01-01
      相关资源
      最近更新 更多