Nothing
DFOP <- function(t, parent.0, k1, k2, g)
{
parent = g * parent.0 * exp(-k1 * t) +
(1 - g) * parent.0 * exp(-k2 * t)
}
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.