tests/testthat/test-1-utilities.r

context("Utilities")

test_that("Returns the percent rank",{
  x <- (1:5)
  expect_equal(perc_rank(x),c(0.2, 0.4, 0.6, 0.8, 1))
})
credoinc/credoc documentation built on May 23, 2019, 8:39 a.m.