From c8931a3a079b8ce1936876a2799f4d98a79f3bf8 Mon Sep 17 00:00:00 2001
From: wbonat <wbonat@gmail.com>
Date: Tue, 10 Nov 2015 16:13:22 +0100
Subject: [PATCH] Fix chcond -> chcond1

---
 vignettes/vignette-01.Rmd | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/vignettes/vignette-01.Rmd b/vignettes/vignette-01.Rmd
index 9812fb1..7ffd51c 100644
--- a/vignettes/vignette-01.Rmd
+++ b/vignettes/vignette-01.Rmd
@@ -175,7 +175,7 @@ barplot(prop.table(xtabs(~illness, data=ahs)),
         ylab="Sample proportion",
         xlab="illness")
 
-barplot(prop.table(xtabs(~chcond, data=ahs)),
+barplot(prop.table(xtabs(~chcond1, data=ahs)),
         ylab="Sample proportion",
         xlab="chcond")
 layout(1)
@@ -183,10 +183,10 @@ layout(1)
 xt <- xtabs(~age+sex, data=ahs)
 mosaicplot(xt)
 
-xt <- xtabs(~age+chcond, data=ahs)
+xt <- xtabs(~age+chcond1, data=ahs)
 mosaicplot(xt)
 
-xt <- xtabs(~sex+chcond, data=ahs)
+xt <- xtabs(~sex+chcond1, data=ahs)
 mosaicplot(xt)
 
 ##----------------------------------------------------------------------
@@ -220,7 +220,7 @@ useOuterStrips(
 
 useOuterStrips(
     combineLimits(
-        xyplot(Ndoc+Nndoc+Nadm+Nhosp+Nmed~age|chcond,
+        xyplot(Ndoc+Nndoc+Nadm+Nhosp+Nmed~age|chcond1,
                groups=sex, outer=TRUE, data=ahs,
                jitter.x=TRUE, amount=0.01,
                type=c("p", "a"),
-- 
GitLab