diff RScript.r @ 19:28cfca2e415d draft

Uploaded
author davidvanzessen
date Mon, 30 Sep 2013 03:20:44 -0400
parents 705b77be17cf
children 4d545fb017c7
line wrap: on
line diff
--- a/RScript.r	Fri Sep 27 09:40:57 2013 -0400
+++ b/RScript.r	Mon Sep 30 03:20:44 2013 -0400
@@ -91,12 +91,12 @@
 #plotall
 #ggsave(outFile, dpi=125)
 
-#sink(outFile, append=FALSE, split=FALSE)
-#merged
-#unlink(outFile)
+sink(outFile, append=FALSE, split=FALSE)
+merged
+unlink(outFile)
 
-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()