library(checkmate)
library(testthat)
context("listArgs")
test_that("listArgs returns the parent functions arguments", {
bla <- function(x){ return(listArgs())}
expect_list(bla(1), len = 1, types = "integerish")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.