Nothing
xyBuildHOM = function(formula, data){
mff = model.frame(formula, data)
# fixed covariates
x.fixed = model.matrix(formula, mff)
# variable names
termsFix = attr(terms(formula),"term.labels")
namesFix = colnames(x.fixed)
# response
y.obs = model.response(mff)
namesY = formula[[2]]
return(list(y.obs = y.obs, namesY = namesY, x.fixed = x.fixed,
nameFix = namesFix))
}
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.