library(testthat)
# library(usethis)
# library(provoc)
#
# use_r("provoc_general") # creates and opens R/foofy.R
# use_test("provoc_general") # creates and opens tests/testthat/test-blarg.R
test_that("importation of h5 files", {
sp <- import.h5(wdir = paste0(system.file(package="provoc"), "/testdata"),
baseline_correction = FALSE)
expect_type(sp, type = "list")
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.