Nothing
lactin <-
function(Tmean, rho, Tmax, deltaT, lambda) {
exp(rho * Tmean) - exp(rho * Tmax - (Tmax - Tmean)/deltaT) + lambda
}
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.