# Rd in man, not roxygen
#' @export
as.factor.lfactor <- function(x) {
class(x) <- "factor"
attr(x, "llevels") <- NULL
x
}
methods::setGeneric("as.factor")
methods::setMethod("as.factor", methods::signature(x="lfactor"), as.factor.lfactor)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.