a <- function(x, y, z) {
while (2 + 2 > call(3, 1)) {
if (isTRUE(x)) {
b
}
}
for (a in 1:19) {
x[i] + 1
}
}
if (
require("logspline") &&
require("rstanarm")
) {
NULL
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.