tests/testthat/test-plotThermalGroupCapacities.R

context("plotThermalGroupCapacities")

test_that("plotThermalGroupCapacities", {
  opts <- setSimulationPath(studyPath)
  GG <- plotThermalGroupCapacities( data = thermalGroupCapacities(opts))

  expect_true("htmlwidget" %in% class(GG))

})

Try the antaresViz package in your browser

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

antaresViz documentation built on June 27, 2024, 5:10 p.m.