Когда я связываю документ, содержащий несколько графиков, полученных с помощью функции purrr: map, я получаю текстовые слайды между каждым слайдом графика, содержащие нежелательную информацию индекса списка (см. Слайды изображений 2, 4, ...

1
datakritter 4 Янв 2021 в 00:02

1 ответ

Лучший ответ

Попробуй это:

  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')
    })
    ```

enter image description here

1
stefan 3 Янв 2021 в 22:27