tests/testthat/test-repeatability_steepness.R

data(dommats, package = "EloRating")
res <- repeatability_steepness(dommats$elephants, n_rand = 10)

test_that("repeatability steepness", {
  expect_true(res$steepness <= 1 & res$steepness >= 0)
})

Try the EloSteepness package in your browser

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

EloSteepness documentation built on Sept. 21, 2023, 1:06 a.m.