tests/testthat/test-tail.R

library(R.oboros)
library(testthat)

test_that("tail works", {
  expect_equal(tail(letters), letters[1:6])
  expect_equal(tail(letters, 1), "a")
})
ChrisFairless/R.oboros documentation built on Feb. 9, 2020, 12:12 a.m.