.get.fp <- function(x) {
if (x == 0) return("reached tolerance criterion")
if (x == 1) return("reached max number of iterations")
if (x == 2) return("exit with error - last valid x is returned")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.