Running ‘testthat.R’ [7s/8s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(naniar)
  > 
  > test_check("naniar")
  ── 1. Error: (unknown) (@test-gg-miss-case.R#5)  ───────────────────────────────
  could not find function "n"
  1: gg_miss_case(airquality) at testthat/test-gg-miss-case.R:5
  2: x %>% miss_case_summary(order = TRUE) %>% dplyr::mutate(case = 1:n()) %>% gg_miss_case_create(show_pct = show_pct)
  3: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: eval(quote(`_fseq`(`_lhs`)), env, env)
  6: `_fseq`(`_lhs`)
  7: freduce(value, `_function_list`)
  8: function_list[[i]](value)
  9: dplyr::mutate(., case = 1:n())
  10: mutate.tbl_df(., case = 1:n())
  11: mutate_impl(.data, dots, caller_env())
  
  ── 2. Error: (unknown) (@test-special-missing-values.R#131)  ───────────────────
  `.data` is a corrupt grouped_df, the `"groups"` attribute must be a data frame
  1: airquality %>% bind_shadow() %>% dplyr::group_by(Month) %>% recode_shadow(Ozone = .where(Wind <= 
         5 ~ "broken_machine")) at testthat/test-special-missing-values.R:131
  2: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  3: eval(quote(`_fseq`(`_lhs`)), env, env)
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: `_fseq`(`_lhs`)
  6: freduce(value, `_function_list`)
  7: withVisible(function_list[[k]](value))
  8: function_list[[k]](value)
  9: recode_shadow(., Ozone = .where(Wind <= 5 ~ "broken_machine"))
  10: data %>% update_shadow(unlist(suffix, use.names = FALSE)) %>% dplyr::mutate(!!!magic_shade_case_when)
  11: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  12: eval(quote(`_fseq`(`_lhs`)), env, env)
  13: eval(quote(`_fseq`(`_lhs`)), env, env)
  14: `_fseq`(`_lhs`)
  15: freduce(value, `_function_list`)
  16: withVisible(function_list[[k]](value))
  17: function_list[[k]](value)
  18: dplyr::mutate(., !!!magic_shade_case_when)
  19: mutate.tbl_df(., !!!magic_shade_case_when)
  20: mutate_impl(.data, dots, caller_env())
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 469 SKIPPED: 15 FAILED: 2
  1. Error: (unknown) (@test-gg-miss-case.R#5) 
  2. Error: (unknown) (@test-special-missing-values.R#131) 
  
  Error: testthat unit tests failed
  Execution halted