R/graphout.R

Defines functions graphout

# 
# Function that plots ggplot object to a Rplots in current dir
# 
#'@export
graphout <- function(expr, device = pdf, width = 16, height = 10) { 
  device(width = width, height = height)
  on.exit(dev.off()) # close device on exit, even if error
  print( eval(expr) )
}
alexgenin/miscutils documentation built on Feb. 13, 2018, 8:10 p.m.