ph_with_img: add image

Description Usage Arguments Examples

View source: R/ppt_ph_with.R

Description

add an image as a new shape in the current slide.

Usage

1
2
3
4
ph_with_img(x, src, type = "body", index = 1, width = NULL,
  height = NULL)

ph_with_img_at(x, src, left, top, width, height, rot = 0)

Arguments

x

a pptx device

src

image filename, the basename of the file must not contain any blank.

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

left, top

location of the new shape on the slide

rot

rotation angle

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
fileout <- tempfile(fileext = ".pptx")
doc <- read_pptx()
doc <- add_slide(doc, layout = "Title and Content", master = "Office Theme")

img.file <- file.path( R.home("doc"), "html", "logo.jpg" )
if( file.exists(img.file) ){
  doc <- ph_with_img(x = doc, type = "body", src = img.file, height = 1.06, width = 1.39 )
}

print(doc, target = fileout )

fileout <- tempfile(fileext = ".pptx")
doc <- read_pptx()
doc <- add_slide(doc, layout = "Title and Content", master = "Office Theme")

img.file <- file.path( R.home("doc"), "html", "logo.jpg" )
if( file.exists(img.file) ){
  doc <- ph_with_img_at(x = doc, src = img.file, height = 1.06, width = 1.39,
    left = 4, top = 4, rot = 45 )
}

print(doc, target = fileout )

davidgohel/oxbase documentation built on June 15, 2018, 7:03 a.m.