fmcfpower <-
function (time, theta)
{
eta <- theta[1]
beta <- theta[2]
fmcfpower <- (time/eta)^beta
return(fmcfpower)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.