tests/testthat/test_palettes.R

context("Test color palettes")


## test data ##
test_that("test palettes", {
    ## skip on CRAN
    skip_on_cran()

    ## generate data
    a <- vimes_pal1(3)
    b <- vimes_pal1(10)

    ## check expected length
    expect_equal(length(a), 3)
    expect_equal(length(b), 10)

})
thibautjombart/vimes documentation built on May 31, 2019, 10:38 a.m.