From 4d68305dca5a1a23559bcffad8c3e858d6d22a75 Mon Sep 17 00:00:00 2001 From: Dariusz Scigocki Date: Tue, 24 Sep 2024 11:19:56 +0200 Subject: [PATCH] fix in test --- tests/testthat/test-standardize_MAE.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/testthat/test-standardize_MAE.R b/tests/testthat/test-standardize_MAE.R index fd102dc5..3d969cf9 100644 --- a/tests/testthat/test-standardize_MAE.R +++ b/tests/testthat/test-standardize_MAE.R @@ -150,7 +150,7 @@ test_that("set_unique_cl_names_dt and set_unique_drug_names_dt works correctly", res_9 <- set_unique_drug_names_dt(dt) res_10 <- set_unique_cl_names_dt(dt) expect_false(identical(res_9, dt)) - expect_equal(length(unique(res_9$DrugName)), 5) + expect_equal(length(unique(res_9$DrugName)), 6) expect_equal(res_10, dt) ## Duplicated both