tests/testthat/test_epmc_ftxt_book.r

context("testing epmc_ftxt_book")

test_that("epmc_ftxt_book returns", {
  skip_on_cran()
  a <- epmc_ftxt_book("NBK32884")

  #correct class metadata
  expect_is(a, "xml_document")

})

Try the europepmc package in your browser

Any scripts or data that you put into this service are public.

europepmc documentation built on Sept. 21, 2023, 1:07 a.m.