Nothing
ce.impute <-
function (data, method = c("mean", "median", "knn"), atr, nomatr = rep(0,
0), k1 = 10)
{#Fixed by Edgar Acuna, september 2015
if (method == "mean")
data.impute = ce.mimp(data, method, atr, nomatr)
else if (method == "median")
data.impute = ce.mimp(data, method, atr, nomatr)
else data.impute = ec.knnimp(data, nomatr, k1)
return(data.impute)
}
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.