Mercurial > repos > moheydarian > ggplot_histogram

diff ggplotscripthistogram.R @ 9:90be6d1315a4 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author moheydarian
date Sun, 12 Mar 2017 20:04:14 -0400
parents 097e19ec0150
children 79c3ce7cc6c4
line wrap: on
line diff
--- a/ggplotscripthistogram.R	Sun Mar 12 20:01:02 2017 -0400
+++ b/ggplotscripthistogram.R	Sun Mar 12 20:04:14 2017 -0400
@@ -58,7 +58,12 @@
 integrated <- read.csv(options$input,sep='\t',header=TRUE)
 input <- melt(integrated)
 
-gg_legend = show.legend=options$legend
+#Show/hide legend
+if(options$legend == "TRUE"){
+    gg_legend = NULL
+} else {options$legend == "FALSE"
+    gg_legend = theme(legend.position="none")
+}
 
 #Choose between automatically scaled x and y axis or user defined
 if(options$scaling == "Automatic"){