view plot_pdf.r @ 45:b66e8946ba75 draft

Uploaded
author davidvanzessen
date Wed, 12 Apr 2017 03:52:33 -0400
parents 716622f5bb4f
children
line wrap: on
line source

library(ggplot2)

args <- commandArgs(trailingOnly = TRUE)
print(args)

input = args[1]
outputdir = args[2]
setwd(outputdir)

load(input)

print(names(pdfplots))

for(n in names(pdfplots)){
    print(paste("n:", n))
    ggsave(pdfplots[[n]], file=n)
}