tests/testthat/test-width.R

context("width")

test_that("misc", {
  expect_equal(width(list(1)), 1)
  expect_error(width("lkjh"))
  expect_equal(width(1:10), 10)
  expect_error(width(.5))
})

Try the incadata package in your browser

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

incadata documentation built on April 14, 2020, 6:08 p.m.