opts <- c("a", "b", "c")
#' @export
test <- function(x = opts) {
print(x)
}
#' @export
test2 <- function(x = opts) {
print(match.arg(x))
}
#' @export
test3 <- function(x = c("a", "b", "c")) {
print(match.arg(x))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.