R/checkKey.R

# checkKey
#
#
checkKey <- function(dfList) {
    sapply(dfList, function(x) names(x)[1]=="KEY" & all(is.numeric(x[,1])))
}

Try the esmprep package in your browser

Any scripts or data that you put into this service are public.

esmprep documentation built on July 5, 2019, 5:03 p.m.