tests/testthat/test-class_resources_qs.R

tar_test("create tar_resources_qs object", {
  x <- resources_qs_init()
  expect_silent(resources_validate(x))
})

tar_test("prohibit empty tar_resources_qs object", {
  expect_error(
    resources_qs_init(compress_level = NULL),
    class = "tar_condition_validate"
  )
})

tar_test("print tar_resources_qs object", {
  x <- resources_qs_init()
  out <- utils::capture.output(print(x))
  expect_true(any(grepl("tar_resources_qs", out)))
})

Try the targets package in your browser

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

targets documentation built on June 8, 2025, 10:24 a.m.