diff ggplotscripthistogram.R @ 26:b4d1be4880da draft

Uploaded

--- a/ggplotscripthistogram.R	Tue Apr 11 18:29:00 2017 -0400
+++ b/ggplotscripthistogram.R	Tue Apr 11 18:29:08 2017 -0400
@@ -70,14 +70,14 @@
 if(options$density == "counts"){
     gg_density = ggplot(input,aes(value, color=variable))
     gg_freq = NULL
-} else if(options$density == "ndensity"){
+} else if(options$density == "cat"){
     gg_density = ggplot(input,aes(value, ..ncount.., color=variable))
     gg_freq = NULL
 } else if(options$density == "freq"){
     gg_density = ggplot(input,aes(value, color=variable))
     gg_freq = aes(y=..count../sum(..count..))
 } else {
-  
+
 }
 
 #Choose between automatically scaled x and y axis or user defined