is.categorical <- function(x) {
inherits(x, c("character", "factor"))
}
notYetImplemented <- function(name = "This method", ...) {
print(paste(name, "has not yet been implemented."))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.