calc_Kars2008 <- function(fit.method = "EXP", ...) {
# nocov start
.Defunct("calc_Huntley2006")
calc_Huntley2006(fit.method = fit.method, ...)
# nocov end
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.