devtools::load_all()
#> ℹ Loading tiltIndicator
data <- tibble::tibble(x = c(1, 2, 3, NA))
# Now
data |> summarize_range(x, na.rm = TRUE)
#> # A tibble: 1 × 2
#> min max
#> <dbl> <dbl>
#> 1 1 3
# Bad
data |> summarize_range(x)
#> # A tibble: 1 × 2
#> min max
#> <dbl> <dbl>
#> 1 NA NA
TODO
EXCEPTIONS