Commit: 8deba366554950bb0017491a1c4d872580e235fa - myprojects-hg-reborn (hg)

Commit MetaInfo

• Revision: 8deba366554950bb0017491a1c4d872580e235fa (tree)
• Time: 2010-09-23 21:44:56
• Author: lorenzo
• Commiter: lorenzo

Log Message

I modified trivially the code (first I was repeating twice the same plot).

Change Summary

• modified: R-codes/ggplot_histogram_overlap.R

Incremental Difference

diff -r 5ffcc4703db3 -r 8deba3665549 R-codes/ggplot_histogram_overlap.R
--- a/R-codes/ggplot_histogram_overlap.R	Thu Sep 23 10:59:54 2010 +0000
+++ b/R-codes/ggplot_histogram_overlap.R	Thu Sep 23 12:44:56 2010 +0000
@@ -15,10 +15,11 @@
 dev.off()
 
 
-gpl <- ggplot(subset(xy, case == "A"), aes(x=value, y = ..density..,
-fill=case, group=case)) +
-       geom_histogram(alpha=0.5,binwidth=0.1, position="identity") +
-       geom_histogram(data = subset(xy, case == "B"),
+
+
+ggplot(subset(xy, case == "A"), aes(x=value, fill=case, group=case)) +
+	geom_histogram(alpha=0.5,binwidth=0.1, position="identity") + 
+	geom_histogram(data = subset(xy, case == "B"),
 alpha=0.5,binwidth=0.2, position="identity")