tests/testthat/test-nth.R

test_that("nth", {
  x = 1:10

  expect_equal(nth(x,1),1)
  expect_equal(nth(x,5),5)
  expect_equal(nth(x,-1),10)
  expect_equal(nth(x,-2),9)
})
hope-data-science/tidyfst documentation built on June 12, 2025, 7:47 a.m.