The R Project SVN R

Rev

Rev 27714 | Rev 42333 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 27714 Rev 30448
Line 74... Line 74...
74
}
74
}
75
\seealso{
75
\seealso{
76
  \code{\link{mosaicplot}}
76
  \code{\link{mosaicplot}}
77
}
77
}
78
\examples{
78
\examples{
79
data(UCBAdmissions)
-
 
80
## Use the Berkeley admission data as in Friendly (1995).
79
## Use the Berkeley admission data as in Friendly (1995).
81
x <- aperm(UCBAdmissions, c(2, 1, 3))
80
x <- aperm(UCBAdmissions, c(2, 1, 3))
82
dimnames(x)[[2]] <- c("Yes", "No")
81
dimnames(x)[[2]] <- c("Yes", "No")
83
names(dimnames(x)) <- c("Sex", "Admit?", "Department")
82
names(dimnames(x)) <- c("Sex", "Admit?", "Department")
84
stats::ftable(x)
83
stats::ftable(x)