grouping var for freq

2025-07-08 22:41:52 +02:00 · 2018-11-06 16:41:59 +01:00
parent 54368fafef
commit 84e08f516a
6 changed files with 116 additions and 41 deletions
--- a/tests/testthat/test-mo_property.R
+++ b/tests/testthat/test-mo_property.R
@ -56,7 +56,7 @@ test_that("mo_property works", {
  # check vector with random values
  library(dplyr)
  df_sample <- AMR::microorganisms %>% sample_n(100)
-  expect_identical(df_sample %>% pull(mo) %>% mo_fullname(),
+  expect_identical(df_sample %>% pull(mo) %>% mo_fullname(language = "en"),
                   df_sample %>% pull(fullname))

 })