Nothing
# @author Paul Bailey
#' @method head edsurvey.data.frame
#' @export
head.edsurvey.data.frame <- function(x, ...) {
edf <- getData(x,
varnames = colnames(x),
dropUnusedLevels = FALSE, omittedLevels = FALSE,
addAttributes = FALSE
)
head(edf, ...)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.