# testmars_control.R
library(mars)
load("testmc.RData")
test_that("mars.control() returns the correct object", {
expect_equal(mars.control(Mmax=10), testmc,ignore_attr=TRUE)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.