tests/testthat/test-h5_nodata.R

In antaresRead: Import, Manipulate and Explore the Results of an 'Antares' Simulation

context("h5 : No data")

if(.requireRhdf5_Antares(stopP = FALSE) & .runH5Test){
  test_that("h5 : no data", {
    skip_according_to_options()
    
    rhdf5::h5createFile("testnodata.h5")
    rhdf5::h5createGroup("testnodata.h5", "hourly")
    DF1 <-  .h5ReadAntares("testnodata.h5", areas = "all", links = "all", clusters = "all", districts = "all")
    rhdf5::h5closeAll()
    expect_true(length(DF1) == 0)
    unlink("testnodata.h5")
  })
}