tests/testthat/test-sfa_set_sfplus.R

test_that("specifying sfplus works", {
  options(sfa_sfplus = NULL)
  expect_null(getOption("sfa_sfplus"))
  sfa_set_sfplus()
  expect_true(getOption("sfa_sfplus"))
  sfa_set_sfplus(FALSE)
  expect_false(getOption("sfa_sfplus"))
})

Try the simfinapi package in your browser

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

simfinapi documentation built on April 14, 2023, 12:27 a.m.