From 1a5d986420b7cbaca942d449c018d9dbd925fe40 Mon Sep 17 00:00:00 2001 From: aleksanderbl29 <73799306+aleksanderbl29@users.noreply.github.com> Date: Wed, 27 Nov 2024 22:10:39 +0100 Subject: [PATCH] Update test to new table Closes #35 --- tests/testthat/test-dst_value_limit.R | 25 ++++++++++++++++++------- 1 file changed, 18 insertions(+), 7 deletions(-) diff --git a/tests/testthat/test-dst_value_limit.R b/tests/testthat/test-dst_value_limit.R index 6bfc7e3..0914277 100644 --- a/tests/testthat/test-dst_value_limit.R +++ b/tests/testthat/test-dst_value_limit.R @@ -4,12 +4,23 @@ context("dst_value_limit") test_that("dst_value_limit returns the correct value.", { - - expect_equal(dst_value_limit(query = list(CIVILSTAND = "*", - STATSB = "*", - HERKOMST = c("Personer med dansk oprindelse", "Efterkommere")), - dst_meta = dst_meta("folk1", lang = "da")), 3318) - - + + expect_equal(dst_value_limit(query = list(CIVILSTAND = "*", + ALDER = "*", + OMRÅDE = c( + "Hele Landet", + "København", + "Dragør", + "Albertslund", + "Christiansø", + "Køge", + "Glostrup", + "Faaborg-Midtfyn", + "Holstebro", + "Læsø" + )), + dst_meta = dst_meta("folk1a", lang = "da")), 6350) + + })