mulbar(width, height, rowlab = NULL, collab = NULL, gap = .2, density = 0, barcol = <<see below>>, angle = 0, ...)
width
and
height
must have the same number of rows and columns.
Missing values are not accepted.
width
.
It defaults to the argument
col
if that is given, otherwise
to par("col").
width
.
A density of 0 means not to fill the bars at all and a density of -1
means to fill the bars with solid color.
density
is not
positive. It will be cyclically extended to the length of
width
..
par
). In addition, the high-level graphics arguments described
under
par
and the arguments to
title
may be supplied to this
function.
height
, and taking their size from
width
and
height
.
Creates a multiple number of barplots arranged in the same number of
rows and columns as the
height
argument. The size of each bar is
determined by the
width
argument. The number of values in
height
and
width
must match.
counts <- telsam.response[1:5,] fit <- loglin(counts, list(1, 2), fit = T)$fit # fit independence model resid <- counts - fit par(mar = c(7, 4.1, 4.1, 2)) mulbar( sqrt(fit), resid/sqrt(fit), collab = dimnames(telsam.response)[[2]], rowlab = dimnames(telsam.response)[[1]][1:5], ylab = "Interviewer", main = "Chi-Plot for Fit to Interviewer Data" ) mtext(side = 1, line = 3, "Height prop. to Signed Contribution to Chi Statistic") mtext(side = 1, line = 4, "Width proportional to Root-Fitted Value") mtext(side = 1, line = 5, "Area Proportional to Fitted Value")