diff RScript.r @ 12:ffcf8f90ad86 draft

Uploaded
author davidvanzessen
date Fri, 27 Sep 2013 06:11:35 -0400
parents 7a1b8021a191
children e445e8a41185
line wrap: on
line diff
--- a/RScript.r	Fri Sep 27 04:44:52 2013 -0400
+++ b/RScript.r	Fri Sep 27 06:11:35 2013 -0400
@@ -5,11 +5,11 @@
 inFile = args[1]
 outFile = args[2]
 
-#install.packages("gridExtra", repos="http://cran.xl-mirror.nl/") 
+install.packages("gridExtra", repos="http://cran.xl-mirror.nl/") 
 library (gridExtra)
-#install.packages("ggplot2", repos="http://cran.xl-mirror.nl/") 
+install.packages("ggplot2", repos="http://cran.xl-mirror.nl/") 
 require(ggplot2)
-#install.packages("plyr", repos="http://cran.xl-mirror.nl/") 		
+install.packages("plyr", repos="http://cran.xl-mirror.nl/") 		
 require(plyr)
 
 test = read.table(inFile, sep="\t", header=TRUE)
@@ -91,9 +91,7 @@
 
 
 png(outFile,width = 1920, height = 1200)
-plot(pV)
-plotall = grid.arrange(pV, arrangeGrob(pD, pJ, ncol=2), ncol=1, widths=c(1,1.2))
-print(plotall)
+print(plotall = grid.arrange(pV, arrangeGrob(pD, pJ, ncol=2), ncol=1, widths=c(1,1.2)))
 dev.off()