diff --git a/R/ctable.R b/R/ctable.R index bee1ca94..578e5cfd 100644 --- a/R/ctable.R +++ b/R/ctable.R @@ -177,7 +177,7 @@ ctable.formula <- function(x, #' @rdname ctable #' @export #' @importFrom stats addmargins na.omit chisq.test qnorm -ctable <- function(x, +ctable.default <- function(x, y, prop = st_options("ctable.prop"), useNA = "ifany", diff --git a/man/ctable.Rd b/man/ctable.Rd index 8bd5805c..6103d387 100644 --- a/man/ctable.Rd +++ b/man/ctable.Rd @@ -3,6 +3,7 @@ \name{ctable} \alias{ctable} \alias{ctable.formula} +\alias{ctable.default} \title{Cross-Tabulation} \usage{ ctable(