re-apply fix from PecanProject#3560 undone in PecanProject#3526

Author: infotroph

modules/uncertainty/R/run.sensitivity.analysis.R

@@ -218,8 +218,7 @@ run.sensitivity.analysis <- function(settings,
         grDevices::pdf(fname, height = 12, width = 9)
         ## arrange plots  http://stackoverflow.com/q/10706753/199217
         ncol <- floor(sqrt(length(sensitivity.plots)))
-        print(do.call(gridExtra::grid.arrange, c(sensitivity.plots, ncol = ncol)))
-        print(sensitivity.plots) # old method.  depreciated.
+        do.call(gridExtra::grid.arrange, c(sensitivity.plots, ncol = ncol))
         grDevices::dev.off()
 
         ### Generate VD diagnostic plots