tests/testthat/test-adapt_scales.R

context("test-adapt_scales")

test_that("Check that scales are working", {
  expect_equal(class(adapt_scales(unnest(dkt, ggseg))), "list")
  expect_equal(class(adapt_scales(unnest(aseg, ggseg))), "list")
})
neuroconductor-devel-releases/ggseg documentation built on May 28, 2020, 3:09 a.m.