Mercurial > repos > moheydarian > ggplot_histogram

comparison ggplotscripthistogram.R @ 11:79c3ce7cc6c4 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:10:03 -0400
parents 90be6d1315a4
children ed06f51b00ef
comparison
equal deleted inserted replaced
10:3372bc887b6d 11:79c3ce7cc6c4
57 57
58 integrated <- read.csv(options$input,sep='\t',header=TRUE) 58 integrated <- read.csv(options$input,sep='\t',header=TRUE)
59 input <- melt(integrated) 59 input <- melt(integrated)
60 60
61 #Show/hide legend 61 #Show/hide legend
62 if(options$legend == "TRUE"){ 62 if(options$legend == "yes"){
63 gg_legend = NULL 63 gg_legend = NULL
64 } else {options$legend == "FALSE" 64 } else {options$legend == "no"
65 gg_legend = theme(legend.position="none") 65 gg_legend = theme(legend.position="none")
66 } 66 }
67 67
68 #Choose between automatically scaled x and y axis or user defined 68 #Choose between automatically scaled x and y axis or user defined
69 if(options$scaling == "Automatic"){ 69 if(options$scaling == "Automatic"){