Nothing
#' @S3method nrow mutaframe
nrow.mutaframe <- function(x) length(attr(x, "row.names")) %||% 0
#' @S3method ncol mutaframe
ncol.mutaframe <- function(x) length(attr(x, "col.names")) %||% 0
#' @S3method dim mutaframe
dim.mutaframe <- function(x) c(nrow.mutaframe(x), ncol.mutaframe(x))
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.