tests/testthat/test-indexing.R

context("indexing")

test_that("nth gives n-th element", {
  expect_equal(nth(1:10, 3), 3)
  expect_equal(nth(list(1, 2, 3), 2), 2)
})
lbartnik/utilities documentation built on May 3, 2019, 11:52 p.m.