tests/testthat/test_package_load.R

In tidymodels: Easily Install and Load the 'Tidymodels' Packages

test_that("loaded packages", {
  loaded <- names(sessionInfo()$otherPkgs)
  expect_true(
    all(tidymodels:::core %in% loaded)
  )
})


test_that("should not be loaded", {
  loaded <- names(sessionInfo()$otherPkgs)
  expect_true(
    all(!(c("rlang", "tidyselect") %in% loaded))
  )
})