Офицер: слайды Power Point с ggplot (s) КАК ИЗОБРАЖЕНИЯ

Приведенный ниже код создает слайд PowerPoint с векторным объектом ggplot, это отлично работает.

Теперь мне нужен тот же слайд с графиком как изображение (например, PNG, не редактируемый). Я думаю, что это было возможно с использованием ph_with_gg (сюжет, разрешение) и т. Д., Но теперь это устарело.

Этого можно добиться с помощью копирования / вставки как изображения в PowerPoint, но это утомительно. Моя основная причина - большие наборы данных и замедление работы PowerPoint из-за слишком большого количества отдельных объектов.

library(ggplot2)
library(officer)
library(rvg)
library(magrittr)
data(iris)

read_pptx() %>%
  add_slide(layout='Title and Content',master='Office Theme') %>%
  ph_with('Iris Sepal Dimensions', location = ph_location_type(type="title")) %>%
  ph_with(dml( ggobj=
                 ggplot(iris, aes(x=Sepal.Length,y=Sepal.Width,col=Species)) +
                 geom_point()), location = ph_location_type(type="body")) %>%
  print('iris_presentation.pptx')

r ggplot2 officer
person Christian    schedule 25.08.2020    source источник

Ответы (1)


arrow_upward
2
arrow_downward

В этом случае вам нужно только не звонить rvg::dml.

library(ggplot2)
library(officer)
library(magrittr)
data(iris)

read_pptx() %>%
  add_slide(layout='Title and Content',master='Office Theme') %>%
  ph_with('Iris Sepal Dimensions', location = ph_location_type(type="title")) %>%
  ph_with(
    ggplot(iris, aes(x=Sepal.Length,y=Sepal.Width,col=Species)) + geom_point(), 
    location = ph_location_type(type="body")) %>%
  print('iris_presentation.pptx')

Вы можете прочитать документацию здесь: https://davidgohel.github.io/officer/articles/offcran/powerpoint.html#ggplot-objects-1.

person David Gohel    schedule 25.08.2020
comment
На самом деле я упустил из виду, что сюжет можно использовать напрямую, и в итоге получится изображение. Но отлично, спасибо. Я склонен слишком много обдумывать :-) - person Christian; 25.08.2020
comment
нет проблем, см. davidgohel.github.io/officer/reference/ph_with.html для получения полного списка поддерживаемых объектов с ph_with - person David Gohel; 25.08.2020