context("Test Helper Functions")
test_that("rbind2 completes successfully", code = {
expect_named(
object = rbind2(iris, mtcars, cars, NULL, data.frame()),
expected = c(names(iris), names(mtcars), names(cars)),
ignore.order = TRUE,
ignore.case = TRUE
)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.