# HG changeset patch
# User greg
# Date 1510246957 18000
# Node ID 9146801c5ba11536eef8fa9dfe718d6c89ffdfa1
# Parent  4d38c1789ae020172cfd5f511e57341c6a077cc0
Uploaded

diff -r 4d38c1789ae0 -r 9146801c5ba1 insect_phenology_model.R
--- a/insect_phenology_model.R	Thu Nov 09 11:45:37 2017 -0500
+++ b/insect_phenology_model.R	Thu Nov 09 12:02:37 2017 -0500
@@ -578,6 +578,7 @@
 g2a.se <- apply(g2a.rep, 1, sd) / sqrt(opt$replications)
 
 dev.new(width=20, height=20)
+sink("/dev/null")
 
 # Start PDF device driver to save charts to output.
 pdf(file=opt$output, height=20, width=20, bg="white")
@@ -649,5 +650,6 @@
     lines (day.all, g2a - g2a.se, col = 4, lty = 2) 
 }
 
+sink()
 # Turn off device driver to flush output.
 dev.off()