tests/testthat/testGetPackage.R

context("GetPackage")

# This is interactive and so is hard to test

test_that("GetPackage", {
  t <- 3
  expect_error(zoon::GetPackage(t), "package must be a character")

  # lme4 <- try(zoon::GetPackage('lme4'), silent = TRUE)
  # expect_null(lme4, info = 'GetPackage has failed with "lme4"')
})
zoonproject/zoon documentation built on March 6, 2020, 1:03 a.m.