test_that("sample test", {
  expect_equal(2 * 2, 4)
})