P281424/AMR
1
0
Fork 0
mirror of https://github.com/msberends/AMR.git synced 2024-12-26 18:46:13 +01:00
Code Releases Activity

unit tests

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends 2018-11-16 22:22:42 +01:00
parent 373e0cb32f
commit d22b7f00da
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
R/freq.R
View File

@ -544,7 +544,7 @@ diff.frequency_tbl <- function(x, y, ...) {
#' @importFrom crayon bold silver #' @importFrom crayon bold silver
#' @export #' @export
print.frequency_tbl <- function(x, nmax = getOption("max.print.freq", default = 15), print.frequency_tbl <- function(x, nmax = getOption("max.print.freq", default = 15),
markdown = !nteractive(), header = !markdown, ...) { markdown = !interactive(), header = !markdown, ...) {
opt <- attr(x, 'opt') opt <- attr(x, 'opt')

2
man/freq.Rd
View File

@ -20,7 +20,7 @@ freq(x, ..., sort.count = TRUE, nmax = getOption("max.print.freq"),
top_freq(f, n) top_freq(f, n)
\method{print}{frequency_tbl}(x, nmax = getOption("max.print.freq", \method{print}{frequency_tbl}(x, nmax = getOption("max.print.freq",
default = 15), ...) default = 15), markdown = !nteractive(), header = !markdown, ...)
} }
\arguments{ \arguments{
\item{x}{vector of any class or a \code{\link{data.frame}}, \code{\link{tibble}} (may contain a grouping variable) or \code{\link{table}}} \item{x}{vector of any class or a \code{\link{data.frame}}, \code{\link{tibble}} (may contain a grouping variable) or \code{\link{table}}}