Create a formattable logical vector

# S3 method for class 'logical'
formattable(x, ..., formatter = "ifelse", preproc = NULL, postproc = NULL)

Arguments

x

a logical vector.

...

arguments to be passed to formatter.

formatter

formatting function, ifelse() in default.

preproc

pre-processor function that prepares x for formatting function.

postproc

post-processor function that transforms formatted output for printing.

Value

a formattable logical vector.

Examples

logi <- c(TRUE, TRUE, FALSE)
flogi <- formattable(logi, "yes", "no")
flogi
#> [1] yes yes no 
!flogi
#> [1] no  no  yes
any(flogi)
#> [1] yes
all(flogi)
#> [1] no