NumDeriv_jacobian <- function(fctToDeriv,WhereFctIsEvaluated,...){
jacobian(fctToDeriv,WhereFctIsEvaluated,
method="Richardson", method.args=list(),
...)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.