test_that("name_extract", {
x <- system.file("examples/BoegerEtal2015.pdf", package="namext")
res <- name_extract(x)
expect_is(res, "list")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.