tests/globalWarming/test-domlem.R

In jaspeir/NIJ_Tabitha: Dominance-based Rough Set Approach and the DOMLEM Algorithm

library(testthat)
library(DRSA)

P = c("SolarEnergy", "VolcanicActivity", "ResidualCO2")

test_that("decision rules obtained for all approximations", {
  domlem = DOMLEM$new(it = globalWarmingIT, P = P)
  domlem$main()
  print(domlem)
})