blankPNG {stationery}

create white background empty PNG

Description

Sometimes you need a placeholder. If you do, this is it!

Usage

blankPNG(
  file,
  height = 250,
  width = 250,
  messg = "Your Logo Could Be Here",
  pointsize = 12,
  col = "gray50"
)

Arguments

file

A file name for output

height

pixels

width

pixels

messg

Default is a reminder statement inside the resulting image, but set "" if you don't want it.

pointsize

pointsize 12 default

col

Color for text in messg parameter. Default is gray50

Value

NULL is returned if file was created. Otherwise error is reported.

Author(s)

Paul Johnson

Examples

tdir <- tempdir()
dir.create(file.path(tdir, "blanks"), recursive = TRUE)
fn1 <- file.path(tdir, "blanks", "blank1.png")
blankPNG(file = fn1, messg = "Do you want a message?")
## Please inspect
if(interactive()) browseURL(fn1)
fn2 <- file.path(tdir, "blanks", "blank2.png")
blankPNG(file = fn2, height = 2, width = 3, messg = "")
if(interactive()) browseURL(fn2)
## delete test directory
unlink(file.path(tdir, "blanks"), recursive = TRUE)