ifthenelse: If this, then that

In attempt: Tools for Defensive Programming

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.

Note

If you want these function to return a value, you need to wrap these values into a mapper / a function. E.g, to return a vector, you'll need to write if_then(1, is.numeric, ~ "Yay").

Examples

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

attempt documentation built on May 4, 2020, 1:05 a.m.