tests/testthat/test-rsf.R

test_that("RSF search", {
  skip_on_cran()
  suppressMessages(vcr::use_cassette("rsf", serialize_with="json", record="new_episodes", {
    rsf <- .standardize_rsf("semi-structured interviews",
                            "2018-01-01", "2020-01-01", FALSE)
  }))
  expect_equal(nrow(rsf), 1)
})
PESData/awardFindR documentation built on March 27, 2024, 4:46 a.m.