tests/testthat/test-user.R

with_mock_dir("t/user", {
  test_that("felt_get_user works", {
    actual <- felt_get_user()
    expect_equal(nrow(actual), expected = 1)
    expect_s3_class(actual, 'data.frame')
  })
})

Try the feltr package in your browser

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

feltr documentation built on Nov. 6, 2023, 1:06 a.m.