diff RScript.r @ 28:e920d28843b6 draft

Uploaded
author davidvanzessen
date Mon, 30 Sep 2013 04:19:57 -0400
parents c1602a99d52f
children 1c25c75d863d
line wrap: on
line diff
--- a/RScript.r	Mon Sep 30 04:00:20 2013 -0400
+++ b/RScript.r	Mon Sep 30 04:19:57 2013 -0400
@@ -90,12 +90,8 @@
 #plotall
 #ggsave(outFile, dpi=125)
 
-cat(PRODFV, file=outFile, sep="\n")
-cat(PRODFD, file=outFile, append=TRUE)
-cat(PRODFJ, file=outFile, append=TRUE)
-
-#png(outFile,width = 1920, height = 1200)
-#print(plotall = grid.arrange(pV, arrangeGrob(pD, pJ, ncol=2), ncol=1, widths=c(1,1.2)))
-#dev.off()
+png(outFile,width = 1920, height = 1200)
+print(plotall = grid.arrange(pV, arrangeGrob(pD, pJ, ncol=2), ncol=1, widths=c(1,1.2)))
+dev.off()