# checkKey # # checkKey <- function(dfList) { sapply(dfList, function(x) names(x)[1]=="KEY" & all(is.numeric(x[,1]))) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.