| Line 13... |
Line 13... |
| 13 |
\title{Mosaic Plots}
|
13 |
\title{Mosaic Plots}
|
| 14 |
\description{Plots a mosaic on the current graphics device.}
|
14 |
\description{Plots a mosaic on the current graphics device.}
|
| 15 |
\usage{
|
15 |
\usage{
|
| 16 |
mosaicplot(x, \dots)
|
16 |
mosaicplot(x, \dots)
|
| 17 |
|
17 |
|
| 18 |
\method{mosaicplot}{default}(x, main = deparse(substitute(x)),
|
18 |
\method{mosaicplot}{default}(x, main = deparse(substitute(x)),
|
| 19 |
sub = NULL, xlab = NULL, ylab = NULL,
|
19 |
sub = NULL, xlab = NULL, ylab = NULL,
|
| 20 |
sort = NULL, off = NULL, dir = NULL,
|
20 |
sort = NULL, off = NULL, dir = NULL,
|
| 21 |
color = NULL, shade = FALSE, margin = NULL,
|
21 |
color = NULL, shade = FALSE, margin = NULL,
|
| 22 |
cex.axis = 0.66, las = par("las"), border = NULL,
|
22 |
cex.axis = 0.66, las = par("las"), border = NULL,
|
| 23 |
type = c("pearson", "deviance", "FT"), \dots)
|
23 |
type = c("pearson", "deviance", "FT"), \dots)
|
| Line 115... |
Line 115... |
| 115 |
See Emerson (1998) for more information and a case study with
|
115 |
See Emerson (1998) for more information and a case study with
|
| 116 |
television viewer data from Nielsen Media Research.
|
116 |
television viewer data from Nielsen Media Research.
|
| 117 |
|
117 |
|
| 118 |
Missing values are not supported except via an \code{na.action}
|
118 |
Missing values are not supported except via an \code{na.action}
|
| 119 |
function when \code{data} contains variables to be cross-tabulated.
|
119 |
function when \code{data} contains variables to be cross-tabulated.
|
| 120 |
|
120 |
|
| 121 |
A more flexible and extensible implementation of mosaic plots written
|
121 |
A more flexible and extensible implementation of mosaic plots written
|
| 122 |
in the grid graphics system is provided in the function
|
122 |
in the grid graphics system is provided in the function
|
| 123 |
\code{\link[vcd]{mosaic}} in the contributed package \CRANpkg{vcd}
|
123 |
\code{\link[vcd]{mosaic}} in the contributed package \CRANpkg{vcd}
|
| 124 |
(Meyer, Zeileis and Hornik, 2005).
|
124 |
(Meyer, Zeileis and Hornik, 2005).
|
| 125 |
}
|
125 |
}
|
| Line 142... |
Line 142... |
| 142 |
\emph{Journal of the American Statistical Association}, \bold{89},
|
142 |
\emph{Journal of the American Statistical Association}, \bold{89},
|
| 143 |
190--200.
|
143 |
190--200.
|
| 144 |
|
144 |
|
| 145 |
Meyer, D., Zeileis, A., and Hornik, K. (2005)
|
145 |
Meyer, D., Zeileis, A., and Hornik, K. (2005)
|
| 146 |
The strucplot framework: Visualizing multi-way contingency tables with vcd.
|
146 |
The strucplot framework: Visualizing multi-way contingency tables with vcd.
|
| 147 |
\emph{Report 22}, Department of Statistics and Mathematics,
|
147 |
\emph{Report 22}, Department of Statistics and Mathematics,
|
| 148 |
\enc{Wirtschaftsuniversität}{Wirtschaftsuniversitaet} Wien, Research Report Series.
|
148 |
\enc{Wirtschaftsuniversität}{Wirtschaftsuniversitaet} Wien, Research Report Series.
|
| 149 |
\url{http://epub.wu.ac.at/dyn/openURL?id=oai:epub.wu-wien.ac.at:epub-wu-01_8a1}
|
149 |
\url{http://epub.wu.ac.at/dyn/openURL?id=oai:epub.wu-wien.ac.at:epub-wu-01_8a1}
|
| 150 |
|
150 |
|
| 151 |
The home page of Michael Friendly
|
151 |
The home page of Michael Friendly
|
| 152 |
(\url{http://www.math.yorku.ca/SCS/friendly.html}) provides
|
152 |
(\url{http://www.math.yorku.ca/SCS/friendly.html}) provides
|
| Line 163... |
Line 163... |
| 163 |
## Formula interface for tabulated data:
|
163 |
## Formula interface for tabulated data:
|
| 164 |
mosaicplot(~ Sex + Age + Survived, data = Titanic, color = TRUE)
|
164 |
mosaicplot(~ Sex + Age + Survived, data = Titanic, color = TRUE)
|
| 165 |
|
165 |
|
| 166 |
mosaicplot(HairEyeColor, shade = TRUE)
|
166 |
mosaicplot(HairEyeColor, shade = TRUE)
|
| 167 |
## Independence model of hair and eye color and sex. Indicates that
|
167 |
## Independence model of hair and eye color and sex. Indicates that
|
| 168 |
## there are more blue eyed blonde females than expected in the case
|
168 |
## there are more blue eyed blonde females than expected in the case
|
| 169 |
## of independence and too few brown eyed blonde females.
|
169 |
## of independence and too few brown eyed blonde females.
|
| 170 |
## The corresponding model is:
|
170 |
## The corresponding model is:
|
| 171 |
fm <- loglin(HairEyeColor, list(1, 2, 3))
|
171 |
fm <- loglin(HairEyeColor, list(1, 2, 3))
|
| 172 |
pchisq(fm$pearson, fm$df, lower.tail = FALSE)
|
172 |
pchisq(fm$pearson, fm$df, lower.tail = FALSE)
|
| 173 |
|
173 |
|