tests/testthat/test_seq.R

context("seq")

test_that("seq", {
  expect_equal(seq_row(iris), seq_len(nrow(iris)))
  expect_equal(seq_col(iris), seq_len(ncol(iris)))
})

Try the BBmisc package in your browser

Any scripts or data that you put into this service are public.

BBmisc documentation built on Sept. 29, 2022, 5:12 p.m.