inst/tinytest/test_lgl2raw.R

expect_equal(hutilscpp:::lgl2raw(c(TRUE, FALSE, NA)), as.raw(c(1L, 0L, 0L)))
expect_equal(hutilscpp:::lgl2raw(c(TRUE, FALSE, NA), na = 2),
             as.raw(c(1L, 0L, 2L)))
expect_error(hutilscpp:::raw2lgl(""), "must be raw")

Try the hutilscpp package in your browser

Any scripts or data that you put into this service are public.

hutilscpp documentation built on Oct. 11, 2023, 9:06 a.m.