Nothing
tableplot_checkNcols <- function(nCols, colNames, sortCol) {
if (!is.numeric(nCols)) stop("<ncolums> is not numeric")
if (nCols < length(sortCol)) stop("<nCols> less than number of sorted columns")
if (nCols == length(sortCol) && length(sortCol) < length(colNames))
stop("<nCols> equal to number of sorted columns while number of selected columns is larger")
ifelse(nCols > length(colNames), length(colNames), nCols)
}
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.