test_that("Test combined dataset", { expect_equal(nrow(data.pck.cntry) > 100, TRUE) })