test_that("it creates DataFrame", {
create_hmmer_json_dataframe("hmmer_json.json",
'dataset_names', desc_null = TRUE)%>%
expect_s3_class("data.frame")
})
test_that("it allows vectorization", {
create_hmmer_json_dataframe(c("hmmer_json.json","hmmer_json.json"),
c('dataset_names', "a"),desc_null = TRUE)%>%
expect_s3_class("data.frame")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.