tests/testthat/testmars_control.R

# 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)
})
tauseefkashtwari/mars-project documentation built on Sept. 15, 2022, 11:30 p.m.