tests/testthat/test-literature_pmid.R

context("literature_pmid")

test_that("literature_pmid", {
	skip_on_cran()

  tt <- literature_pmid(pmid = 1)

  expect_is(tt, "list")
  expect_is(tt[[1]], "list")
  expect_equal(length(tt[[1]]), 18)
})

Try the rif package in your browser

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

rif documentation built on May 2, 2019, 5:54 a.m.