tests/testthat/test_outlier_anglebased.R

library(rElki)


testthat::test_that('fast_abod', {
  test_data   <- replicate(5, rnorm(20))
  test_result <- rElki::fast_abod(test_data, 3)
  testthat::expect_length(test_result, nrow(test_data))
  testthat::expect_null(rJava::.jgetEx())
})
lenaWitterauf/rElki documentation built on June 2, 2020, 9:24 p.m.