if_else: Vectorised if

In poorman: A Poor Man's Dependency Free Recreation of 'dplyr'

Vectorised if

Description

This is a wrapper around ifelse() which checks that true and false are of the same type, making the output more predictable.

Usage

if_else(condition, true, false, missing = NULL)

Arguments

condition	A logical(n) vector.
true, false	Values to use for TRUE and FALSE in condition. They must either be the same length as condition or be length 1. They must also be the same type.
missing	If not NULL (the default), this will replace any missing values.

Value

A vector the same length as condition with values for TRUE and FALSE replaced by those specified in true and false, respectively.

Examples

x <- c(-5:5, NA)
if_else(x < 0, NA_integer_, x)
if_else(x < 0, "negative", "positive", "missing")

# Unlike ifelse, if_else preserves types
x <- factor(sample(letters[1:5], 10, replace = TRUE))
ifelse(x %in% c("a", "b", "c"), x, factor(NA))
# Attributes are taken from the `true` vector
if_else(x %in% c("a", "b", "c"), x, factor(NA))

poorman documentation built on Nov. 2, 2023, 5:27 p.m.