tests/testthat/test_unload.R

context("Unloading")

dyn_lib_names <- function() {
  sapply(.dynLibs(), `[[`, "name")
}

expect_true("rnndescent" %in% dyn_lib_names())
unloadNamespace("rnndescent")
expect_false("rnndescent" %in% dyn_lib_names())

Try the rnndescent package in your browser

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

rnndescent documentation built on May 29, 2024, 8:38 a.m.