tests/testthat/test-hent_data.R

context("test-hent_data")

test_that("function returns one value", {
  df <- hent_produksjonsdata()
  expect_length(hent_produksjon_for_kraftverk(df, kraftverk = "Aall-Ulefoss"), 1)

  expect_error(hent_produksjon_for_kraftverk(df, "Bergen"))
})
markusmortensen/verdsettKraftSelskap documentation built on Nov. 5, 2019, 2:54 p.m.