tests/testthat/test-citation.R

test_that("package provides a citation", {
  cit <- utils::citation("plsRglm")
  # citation() returns a 'bibentry' or list of bibentry
  expect_true(inherits(cit, "bibentry") || (is.list(cit) && all(vapply(cit, inherits, logical(1), "bibentry"))))
})

Try the plsRglm package in your browser

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

plsRglm documentation built on June 17, 2026, 5:06 p.m.