tests/testthat/test-Hedges_g.R

test_that("Hedges_g", {
  testthat::expect_true(round(Hedges_g(Cremains_measurements[1, ])$g, 4) == 1.6272)
  testthat::expect_true(round(Hedges_g(Cremains_measurements[1, ], rand = F, B = 100)[[2]], 4)
  == 0.8933)
})

Try the TestDimorph package in your browser

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

TestDimorph documentation built on Nov. 18, 2023, 1:11 a.m.