inst/examplepkg/tests/testthat/test-hypotenuse.R

test_that("hypotenuse is calculated correctly", {
  expect_equal(hypotenuse(3, 4), 5)

  test_that("with negative lengths", {
    expect_equal(hypotenuse(-3, -4), 5)  
  })
})
Genentech/covtracer documentation built on Feb. 18, 2025, 10:34 a.m.