Nothing
#' Anonymous function approximating the death rate
#'
#' @param a parameter vector
#' @param t time vector
#'
#'@return No return value, called for side effects
kappaFun = function(a, t) {a[1] / (exp(a[2]*(t-a[3])))}
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.