tests/testthat/test-thinFeatures.R

test_that("thinFeatures works", {
  skip_on_ci()
  skip_on_cran()
  data(permafrost)
  res <- thinFeatures(permafrost, "Type", n.cores = 2)
  expect_snapshot(res$VSURF_outcome[,1]) #The other columns might be different because of the random nature of random forests...
})

Try the SAiVE package in your browser

Any scripts or data that you put into this service are public.

SAiVE documentation built on May 29, 2024, 6:48 a.m.