tests/testthat/test_server_getOMLDataSetQualities.R

test_that("getOMLDataSetQualities", {
  with_test_server({
    qual = getOMLDataSetQualities(1)
    expect_data_frame(qual, min.rows = 1L, ncol = 2L)
    expect_set_equal(names(qual), c("name", "value"))
    expect_character(qual$name, unique = TRUE, any.missing = FALSE)
    expect_numeric(qual$value, any.missing = FALSE)
  })
})
openml/r documentation built on Oct. 21, 2022, 2:21 a.m.