Nothing
scalevalue<-function(key.scale, z){
# scalevalue - computes scale of detection function for a given
# set of scale covariates and parameters, using log link
# Args:
# key.scale scale parameters
# z design matrix for scale covariates
exp(z %*% key.scale)
}
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.