tests/testthat/test-adapt_scales.R

context("test-adapt_scales")

test_that("Check that scales are working", {
  expect_equal(class(adapt_scales(unnest(dk, ggseg))), "list")
  expect_equal(class(adapt_scales(unnest(aseg, ggseg))), "list")
})
neuroconductor-releases/ggseg documentation built on Oct. 30, 2020, 11:08 p.m.