[feature request] pipe friendly assert/test statements

[vorpalvorpal]

At present the following works:

library(tidyverse)
library(checkmate)

tibble(a = c(1,2)) |>
  mutate(a = assert_numeric(a)) |>
  # continue with pipe

However, it feels like a waste to replace a with the output of assert_numeric (which is of course equal to a). Would it be possible to instead have a dplyr style function along the lines of:

tibble(a = c(1,2)) |>
  check(test_numeric(a)) |>
  # continue with pipe

where check() does dplyr style data-masking and then just returns its input (or raises an error).