# HG changeset patch
# User davidvanzessen
# Date 1380528020 14400
# Node ID c1602a99d52f0b085553b1b5a8ae64ded30029d6
# Parent  f63adbd10a63178c29ef3f1d46a3bd7818e1c0ea
Uploaded

diff -r f63adbd10a63 -r c1602a99d52f RScript.r
--- a/RScript.r	Mon Sep 30 03:50:05 2013 -0400
+++ b/RScript.r	Mon Sep 30 04:00:20 2013 -0400
@@ -90,11 +90,9 @@
 #plotall
 #ggsave(outFile, dpi=125)
 
-sink(outFile, append=TRUE, split=FALSE)
-cat(PRODFV)
-cat(PRODFD)
-cat(PRODFJ)
-sink()
+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)))