attempt (version 0.3.1)

if_then: If this, then that

Description

If this, then that

Usage

if_then(.x, .p = isTRUE, .f)
if_not(.x, .p = isTRUE, .f)
if_else(.x, .p = isTRUE, .f, .else)

Arguments

.x

the object to test. If NULL (the default), only .p is evaluated.

.p

the predicate for testing. Defaut is isTRUE.

.f

a mapper or a function run if .p(.x) is TRUE

.else

a mapper or a function run if .p(.x) is not TRUE

Value

Depending on wether or not .p(.x) is TRUE, .f() or .else() is run.

Examples

# NOT RUN {
a <- if_then(1, is.numeric, ~ "Yay")
a <- if_not(1, is.character, ~ "Yay")
a <- if_else(.x = TRUE, .f = ~ "Yay", .else = ~ "Nay")
# }