`ones` <-
function (d, w)
######################################
# Number of final units estimator. #
######################################
{
sum(d[, w])
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.