view plot_pdf.r @ 87:64bbc6734ec7 draft

"planemo upload commit 0dcc3e4e47a066373ff0bd56f16536298f8ac2a0"
author rhpvorderman
date Wed, 27 Oct 2021 11:30:25 +0000
parents b6f9a640e098
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)
}