inst/extdata/example_project/tests/testthat/test-utility_functions_with_different_name.R

In assertHE: Visualisation and Verification of Health Economic Decision Models

# utility function

test_that("example code prints correctly",
          {
            output <- utility_example()

            expect_equal(object = output,
                         expected = "example_utility_function")


          })