From 693cf451e9aa2861157f34ad1c14e362401c22da Mon Sep 17 00:00:00 2001 From: Emilio Date: Thu, 16 Jul 2026 22:16:02 -0400 Subject: [PATCH] new algo authors_match()=new expected result in tests --- tests/testthat/test_authors_match.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/testthat/test_authors_match.R b/tests/testthat/test_authors_match.R index 4b42758..ae10be8 100644 --- a/tests/testthat/test_authors_match.R +++ b/tests/testthat/test_authors_match.R @@ -94,7 +94,7 @@ test_that("Authors match correctly", { actual <- authors_match(df) - expect_equal(actual$groupID, c(1,2,2,1)) + expect_equal(actual$groupID, c(4,2,2,4)) expect_equal(which(is.na(actual$similarity)), c(1,2,3,4)) # for loop line 62