tests/testthat/test_transpose.R

test_that("transpose_list", {
  x = list(list(a = 2, b = 3), list(a = 5, b = 10))
  expect_equal(transpose_list(x), list(a = list(2, 5), b = list(3, 10)))

  x = list(a = list())
  expect_equal(transpose_list(x), list())
})
mlr-org/mlr3misc documentation built on Aug. 21, 2024, 4:06 a.m.