tests/testthat/test-size.R

test_that("size works", {
  expect_equal(size(vector(length = 3L)), 3L)
  expect_equal(size(matrix()), 1L)
  expect_equal(size(list(a = matrix())), 1L)
})
llrs/integration-helper documentation built on Sept. 24, 2021, 10:57 a.m.