officer (version 0.2.0)

ph_with_gg: add ggplot to a pptx presentation

Description

add a ggplot as a png image into an rpptx object

Usage

ph_with_gg(x, value, type = "body", index = 1, width = NULL,
  height = NULL, ...)
ph_with_gg_at(x, value, width, height, left, top, ...)

Arguments

x

a pptx device

value

ggplot object

type

placeholder type

index

placeholder index (integer). This is to be used when a placeholder type is not unique in the current slide, e.g. two placeholders with type 'body'.

width, height

image size in inches

...

Arguments to be passed to png function.

left, top

location of the new shape on the slide

Examples

# NOT RUN {
if( require("ggplot2") ){
  doc <- read_pptx()
  doc <- add_slide(doc, layout = "Title and Content",
    master = "Office Theme")

  gg_plot <- ggplot(data = iris ) +
    geom_point(mapping = aes(Sepal.Length, Petal.Length), size = 3) +
    theme_minimal()

  if( capabilities(what = "png") ){
    doc <- ph_with_gg(doc, value = gg_plot )
    doc <- ph_with_gg_at(doc, value = gg_plot,
      height = 4, width = 8, left = 4, top = 4 )
  }

  print(doc, target = "ph_with_gg.pptx" )
}
# }