我想知道我是否能得到一些帮助.

假设我有三个文件:

top-level.rmd
q1.rmd
q2.rmd

top-level.rmd的内容:

---
title: "hw1-2330981"
author: "Ian Quah"
date: "`r Sys.Date()`"
output: html_document
---


```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```


```{r child = 'q1.Rmd'}

```

```{r child = 'q2.Rmd'}

```

(很抱歉,格式出得很奇怪)

q1.rmd的内容:

---
title: "hw_sol_q1"
author: "Ian Quah"
date: "`r Sys.Date()`"
output: html_document
---

# Question 1: `pressure.csv` {.tabset}

## a) `getwd()`

```{r }
getwd()
```

q2.rmd美元的内容

---
title: "hw_sol_q1"
author: "Ian Quah"
date: "`r Sys.Date()`"
output: html_document
---

# Question 2: something else {.tabset}

## a) `getwd()`

```{r }
getwd()
```

我试图在主页上生成两个选项卡,其中每个选项卡包含一个对应的问题,其中包含一个平面格式的所有子问题(我们向下滚动以查看每个子问题的解决方案).我试着在每个问题的顶层标题中添加{.tabset}(见下文),但最终结果并不是我所希望的.

TL;我想要DR


包含一些文本的顶级页面

塔布1/___

(wiki1 View)

Q1.1

.. .. ..

Q1.2

如果我点击选项卡2,我会看到

Q2.1

.. .. ..

Q2.2

在顶级渲染

推荐答案

您需要在选项卡的mother元素上指定.tabset类:

Top-level.Rmd

---
title: "hw1-2330981"
author: "Ian Quah"
date: "`r Sys.Date()`"
output: html_document
---


```{r setup, include=FALSE}
knitr::opts_chunk$set(echo = TRUE)
```

# Questions {.tabset}

```{r child = 'Q1.rmd:q1.rmd'}
```

```{r child = 'Q2.rmd:q2.rmd'}
```

Q1.rmd:q1.rmd

---
title: "hw_sol_q1"
author: "Ian Quah"
date: "`r Sys.Date()`"
output: html_document
---

## Question 1: `pressure.csv`

### a) `getwd()`

```{r}
1 + 1
```

Q2.rmd:q2.rmd

---
title: "hw_sol_q1"
author: "Ian Quah"
date: "`r Sys.Date()`"
output: html_document
---

## Question 2: something else 

### a) `getwd()`

```{r}
1 + 1
```

输出

Rendered RMarkdown report with two tabs showing the separate questions


补充说明

如果出于某种原因,您不喜欢显示标记为Questions的标题(有些多余),您可以使用一些自定义CSS将其完全隐藏:

```{css, echo = FALSE}
.questions > h1 {
  display: none;
}
```

# Questions {.tabset .questions}

R相关问答推荐

R中的枢轴/转置

如何将具有重复名称的收件箱合并到R中的另一列中,而结果不同?

如何删除R中除某些特定名称外的所有字符串?

根据多个条件增加y轴高度以适应geom_text标签

R中的时间序列(Ts)函数计数不正确

在GG图中绘制射线的自动程序

如何在R中平滑地绘制线图(不拟合)?

在另一个包中设置断点&S R函数

如何从向量构造一系列双边公式

当每个变量值只能 Select 一次时,如何从数据框中 Select 两个变量的组合?

在R中使用列表(作为tibble列)进行向量化?

如何计算增加10米(0.01公里)的行?

将摘要图添加到facet_WRAP gglot的末尾

R -基线图-图形周围的阴影区域

数值型数据与字符混合时如何进行绑定

按组和连续id计算日期差

R/shiny APP:如何充分利用窗口?

将字符变量出现次数不相等的字符框整形为pivot_wider,而不删除重复名称或嵌套字符变量

在shiny /bslb中,当卡片是从json生成时,如何水平排列卡片?

如何在类应用函数中访问函数本身