Nothing
#' @rdname tabit
#' @export
ti_tab1 <-
function(...){
.Deprecated("tabit_1/tabit_df")
tabit(...)
}
#' tabit
#'
#' Tabulation function that automatically performs one way tabulations as well
#' as cross tabulations depending on the input type - inheriting from
#' data.frame or not.
#'
#' @param ... parameters forwarded to tabit_1/tabit_df
#'
#' @export
#'
tabit <-
function(...){
if ( inherits(list(...)[[1]], "data.frame") ){
return(tabit_x(...))
} else {
return(tabit_1(...))
}
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.