Ignore infinite values in a predicate

This modifies a predicate function to ignore Inf.

Usage

mod_infinitable(pred)

Arguments

pred

A predicate function

Value

A new predicate that ignores infinites

Examples

# The `is_incrementing` predicate will fail here
x <- c(1, Inf, 3)
is_incrementing(x) # FALSE
#> [1] FALSE

is_incrementing_inf <- mod_infinitable(is_incrementing)
is_incrementing_inf(x) # TRUE
#> [1] TRUE