tests/testthat/test_plot_variation.R

test_that("plot_variation is OK", {
  expect_null(plot_variation())

  data <- "TEST"
  data$value <- "1"
  expect_null(plot_variation(input_data = data, type = "tmp"))
})
Helseatlas/helseatlas documentation built on June 9, 2020, 5:48 p.m.