tests/testthat/test-width.R

context("width")

test_that("misc", {
  expect_that(width(list(1)), equals(1))
  expect_that(width("lkjh"), throws_error())
  expect_that(width(1:10), is_equivalent_to(10))
})

Try the rccmisc package in your browser

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

rccmisc documentation built on May 2, 2019, 2:48 p.m.