tests/testthat/test-test_importance.R

test_that("shuffle column retains other elements of dataframe", {
  j <- 1
  shuffled <- shuffle_column(mtcars, j)

  expect_equal(mtcars[, -j], shuffled[, -j])
})
NICD-UK/xrayspecs documentation built on Oct. 30, 2019, 10:05 p.m.