tests/testthat/test_server_listOMLStudies.R

test_that("listOMLStudies", {
  with_main_server({
    studies = .listOMLStudies()
    expect_data_frame(studies, ncols = 3L, col.names = "unique")
    expect_set_equal(names(studies), c("id", "alias", "name"))
    expect_integer(studies$id, any.missing = FALSE, all.missing = FALSE)
  })
})
openml/r documentation built on Oct. 21, 2022, 2:21 a.m.