Nothing
library("matrixStats")
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
# Subsetted tests
# - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
source("utils/validateIndicesFramework.R")
x <- runif(4, min = -3, max = 3)
x[2] <- NA
for (mode in c("integer", "numeric")) {
storage.mode(x) <- mode
for (idxs in index_cases) {
validateIndicesTestVector(x, idxs,
ftest = anyMissing, fsure = function(x, ...) {
anyValue(x, value = NA)
})
}
}
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.