tests/testthat/test-ml-cat.R

context("Get Name Suffix Cat")

test_that("Adult ML1 cat", {

  report <- adult_ml1_cat("http://www.google.com")
  expect_that(report, is_a("data.frame"))
})
themains/rdomains documentation built on April 23, 2023, 8:53 a.m.