tests/testthat/test_rgb2hex.R
In tsieger/tsiMisc: Miscelaneous utility functions, mostly related to exploratory statistical analysis
context('rgb2hex')
# simple cases
expect_that(rgb2hex(RGB(t(col2rgb('yellow')))), equals('#FFFF00'))
expect_that(rgb2hex(RGB(t(col2rgb(c('white','black'))))), equals(c('#FFFFFF','#000000')))
expect_that(rgb2hex(NULL), equals(NULL))
# bad arguments
expect_error(rgb2hex())
expect_warning(rgb2hex('a'))
expect_warning(rgb2hex('a','b'))
expect_error(rgb2hex('a','b','c'))
tsieger/tsiMisc documentation built on Oct. 10, 2023, 10:24 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
context('rgb2hex')
# simple cases
expect_that(rgb2hex(RGB(t(col2rgb('yellow')))), equals('#FFFF00'))
expect_that(rgb2hex(RGB(t(col2rgb(c('white','black'))))), equals(c('#FFFFFF','#000000')))
expect_that(rgb2hex(NULL), equals(NULL))
# bad arguments
expect_error(rgb2hex())
expect_warning(rgb2hex('a'))
expect_warning(rgb2hex('a','b'))
expect_error(rgb2hex('a','b','c'))
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.