tests/testthat/test_which.R

context("which")

test_that("which works", {
  x <- c(TRUE, FALSE, NA, TRUE, TRUE, FALSE)
  expect_that(as_rvec(which(x)), equals(which(x)))
})
djvanderlaan/lvec_stats documentation built on Oct. 4, 2022, 7:02 p.m.