# TODO: Documentation de is.color.R
#
# Author: David GOHEL <david.gohel@lysis-consultants.fr>
# Date: 6 mai 2013
# Version: 0.1
###############################################################################
is.color <- function(x) {
sapply(x, function( x ) {
tryCatch( is.matrix( col2rgb( x ) ), error = function( e ) F )
})
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.