Default value for NULL or no length

Replace if NULL or not length

Usage

x %||% y

x %|||% y

x %len% y

Arguments

x, y

If x is NULL returns y; otherwise x

Value

x if it is not NULL or has length, depending on check

Details

A mostly copy of rlang's %||% except does not use rlang::is_null(), which, currently, calls the same primitive base::is.null function.

Note: %||% is not exported in versions of R < 4.4.

Examples

# replace NULL (for R < 4.4)
NULL %||% 1L
#> [1] 1
2L   %||% 1L
#> [1] 2

# replace empty
""       %|||% 1L
#> [1] 1
NA       %|||% 1L
#> [1] 1
double() %|||% 1L
#> [1] 1
NULL     %|||% 1L
#> [1] 1

# replace no length
logical() %len% TRUE
#> [1] TRUE
FALSE     %len% TRUE
#> [1] FALSE