tests/testthat/test-math-span.R

context("test span")

test_that("span counting code works", {
  vals = c(2, 2, 3, 4, 4, 6, 7, 7, 8, 6, 6, 6, 7, 8)
  correct_span = 7
  
  expect_equal(aceR:::ace_span(vals), correct_span)
})
josegallegos07/aceR documentation built on June 27, 2022, 10:25 a.m.