stable <- function(x) {
2.5 - 0.5 * (x + 2)^2
}
unstable <- function(x) {
2.5 - 0.5 * (x - 2)^2
}
foostable <- function(x) {
-x^5
}
foounstable <- function(x) {
x^5
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.