tests/testthat/test-pillar-utils.R

test_that("turning pillars into columns and back again works", {
  aaa <- array(1:27, dim = rep(3, 3))
  expect_equal(aaa, pillars_to_cols(aaa) %>% cols_to_pillars(dim(aaa)))
})
rorynolan/detrendr documentation built on March 9, 2023, 10:26 p.m.