tests/testthat/test-print.R

test_that("printing a plume object is identical to cat()", {
  aut <- Plume$new(data.frame(given_name = "X", family_name = "Y"))
  expect_output(print(aut$get_author_list()), "X Y")
})

Try the plume package in your browser

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

plume documentation built on Sept. 12, 2024, 7:31 a.m.