Improve type-checking

[hfrick]

to test-drive the CC skill for the rlang type checkers

[hfrick]

x <- c(1, 10)
class(x)
#> [1] "numeric"
typeof(x)
#> [1] "double"
purrr::map(x, typeof)
#> [[1]]
#> [1] "double"
#> 
#> [[2]]
#> [1] "double"

x1 <- as.integer(x)
class(x1)
#> [1] "integer"
typeof(x1)
#> [1] "integer"
purrr::map(x1, typeof)
#> [[1]]
#> [1] "integer"
#> 
#> [[2]]
#> [1] "integer"

# but
x[c(TRUE, TRUE)] <- as.integer(x)
class(x)
#> [1] "numeric"
typeof(x)
#> [1] "double"
purrr::map(x, typeof)
#> [[1]]
#> [1] "double"
#> 
#> [[2]]
#> [1] "double"

^{Created on 2026-01-25 with reprex v2.1.1}