tests/testthat/test_collapse.R

context("collapse")

test_that("collapse", {
  expect_equal(collapse(1), "1")
  expect_equal(collapse(1:2), "1,2")
  expect_equal(collapse(c("a", "22")), "a,22")
})

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.