rmarkdown/purrr:删除图之间的列表索引

dat*_*ter 4 r r-markdown purrr

当我编织包含通过 purrr:map 函数获得的多个绘图的文档时,我在每个包含不需要的列表索引信息的绘图幻灯片之间获得文本幻灯片(请参阅图像幻灯片 2、4 和 6)。我想删除这些并且只有情节。

  • 我已经尝试过results = "hide"results = FALSE在标题中。这些只返回一个图而不是多个图,并且文本仍然存在。
  • 我尝试按照 此处的建议在我的代码中添加无形() 。我看不出有什么区别。

我怎样才能删除这些并只有三张幻灯片,其中三张图没有文字?

显示交替的绘图和文本幻灯片的 Powerpoint 托盘

---
title: "Reprex"
output: powerpoint_presentation
---

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

```{r echo=FALSE, results = FALSE}
ys <- c("mpg","cyl","disp")
ys %>% map(function(y) 
    invisible(ggplot(mtcars, aes(hp)) + geom_point(aes_string(y=y))))
```
Run Code Online (Sandbox Code Playgroud)

ste*_*fan 5

尝试这个:

  1. 要抑制控制台输出,请purrr::walk使用map. 参见https://chrisbeeley.net/?p=1198
  2. 要将每个图打印在单独的幻灯片上,请使用results='asis'并在每个图后添加两个换行符cat('\n\n')

    ---
    title: "Reprex"
    output: powerpoint_presentation
    ---
    
    ```{r include=FALSE}
    library(tidyverse)
    ```
    
    ```{r echo=FALSE, results='asis'}
    ys <- c("mpg","cyl","disp")
    walk(ys, function(y) {
      p <- ggplot(mtcars, aes(hp)) + geom_point(aes_string(y=y))
      print(p)
      cat('\n\n')
    })
    ```

Run Code Online (Sandbox Code Playgroud)

在此输入图像描述