R/savePlot.R

In BioHPC/iCAT: immune Cell Analysis Tool

#' Save plot to pdf.
#'
#' @param file name to give plot file
#' @param plotIn plot object
#' @return ggplot2::ggsave return
#' @export
#' @examples 
#' savePlot("plot.pdf", ggplot2::qplot(1:5))
savePlot <- function(file, plotIn) {
  ggplot2::ggsave(
    file,
    device = "pdf",
    plot = plotIn,
    width = 5,
    height = 5,
    units = "in",
    dpi = 200
  )
}