Displaying 1 result from an estimated 1 matches for "rvlab".
Did you mean:
rlab
2015 Jan 16
1
S3 generic method dispatch on promises
...y, but hate to leave this problem until I fully
understand it.
pctable <- function(rv, ...)
{
UseMethod("pctable")
}
## rv: row variable, quoted or not
## cv: column variable, quoted or not
pctable.default <- function(rv, cv, data = parent.frame(),
rvlab = NULL, cvlab = NULL,
colpct = TRUE, rowpct = FALSE,
exclude = c(NA, NaN), rounded = FALSE)
{
rvlabel <- if (!missing(rv)) deparse(substitute(rv))
cvlabel <- if (!missing(cv)) deparse(substitute(cv))
rvlab <- if (is.null(r...