如何从RMarkdown html输出中的文本中的代码块中的数据框中获取数字（或文本）？

Question

当输出是word文档时，我可以使这个工作，但是当输出是html时，我不能。

---
title: "R Notebook"
output:
  word_document: default
  html_notebook: default
---

```{r, include = FALSE}
library(tidyverse)
mtcars

```

Number `r  mtcars %>% select(mpg) %>% slice(1)`

单词输出是

21号

但是当输出是html时，我得到一整张表。

有没有办法在html输出中获取文本？

它会在文本中使用，所以我不想要这个表。

Answer 1

slice返回类数据帧，因此您将输出为表

mtcars %>% select(mpg) %>% slice(1) %>% class
#[1] "data.frame"

你需要输出作为向量，所以任何将最终输出作为向量的方法都可以。在这里，我使用pull（记住你使用tidyverse）将输出作为向量（这里是numeric）。

mtcars %>% select(mpg) %>% slice(1) %>% pull %>% class
#[1] "numeric"

那样做，

---
title: "R Notebook"
output:
  word_document: default
  html_notebook: default
---

```{r, include = FALSE}
library(tidyverse)
mtcars
```

Number `r  mtcars %>% select(mpg) %>% slice(1) %>% pull`

这不会改变Word中的输出，它仍然可以像以前一样工作。