tests/testthat/test-options.R

context("Testing package .onLoad and options")
test_that("There should be diffnet options", {
  netdiffuseR:::.onLoad()
  expect_is(getOption("diffnet.self"), "logical")
  expect_is(getOption("diffnet.undirected"), "logical")
  expect_is(getOption("diffnet.multiple"), "logical")
  expect_is(getOption("diffnet.tol"), "numeric")
})
srdyal/diffusiontest documentation built on Sept. 2, 2023, 2:49 p.m.