Permalink
Browse files

small change to comparisons.R

  • Loading branch information...
heike committed May 14, 2017
1 parent 17ff23e commit 259030d5bc411ca3f0c2feb755a16d348db3f34a
Showing with 4 additions and 2 deletions.
  1. +4 −2 inst/comparisons.R
View
@@ -10,8 +10,10 @@ a.2 <- productplots::prodplot(happy, ~ happy, "hspine")
b.2 <- ggplot(data = happy) + geom_mosaic(aes(weight = wtssall, x = product(happy)), divider="hspine")
multiplot(a2, b.2,layout=matrix(c(1:2), nrow=1, byrow=FALSE))
a.3 <- prodplot(happy, ~ sex + happy, c("vspine", "hspine"))
b.3 <- ggplot(data = happy) + geom_mosaic(aes(weight = wtssall, x = product(sex, happy)), divider=c("vspine", "hspine"))
a.3 <- prodplot(happy, ~ sex + happy, c("vspine", "hbar"))
b.3 <- ggplot(data = happy) + geom_mosaic(aes(x = product(sex, happy)), divider=c("vspine", "hbar"))
multiplot(a.3, b.3,layout=matrix(c(1:2), nrow=1, byrow=FALSE))

0 comments on commit 259030d

Please sign in to comment.