Summarising missing data - error in purrr::map()

[zcuccu]

Returning the following error this morning;

2025-01-15 08:14:33.495098 - Summarising missing data Error in purrr::map(): i In index: 2. Caused by error in purrr::map(): i In index: 1. Caused by error in dplyr::collect(): ! Failed to collect lazy table. Caused by error in result_fetch(): ! invalid value

`Backtrace:
x

1. +-base::source("RunCharacterisation.R")
2. | +-base::withVisible(eval(ei, envir))
3. | -base::eval(ei, envir)
4. | -base::eval(ei, envir)
5. -OmopSketch::summariseMissingData(...) at RunCharacterisation.R:36:1
6. +-purrr::compact(...)
7. | -purrr::discard(.x, function(x) is_empty(.f(x)))
8. | -purrr:::where_if(.x, .p, ...)
9. | -purrr:::map_(.x, .p, ..., .type = "logical", .purrr_error_call = .purrr_error_call)
10. | -purrr:::vctrs_vec_compat(.x, .purrr_user_env)
11. -purrr::map(...)

12. \-purrr:::map_("list", .x, .f, ..., .progress = .progress)
    

13.   +-purrr:::with_indexed_errors(...)
    

14.   | \-base::withCallingHandlers(...)
    

15.   +-purrr:::call_with_cleanup(...)
    

16.   \-OmopSketch (local) .f(.x[[i]], ...)
    

17.     +-dplyr::select(...)
    

18.     +-dplyr::arrange(...)
    

19.     +-dplyr::inner_join(...)
    

20.     +-dplyr::mutate(...)
    

21.     +-OmopSketch:::summariseMissingInternal(...)
    

22.     | +-dplyr::bind_rows(...)
    

23.     | | \-rlang::list2(...)
    

24.     | \-purrr::map(...)
    

25.     |   \-purrr:::map_("list", .x, .f, ..., .progress = .progress)
    

26.     |     +-purrr:::with_indexed_errors(...)
    

27.     |     | \-base::withCallingHandlers(...)
    

28.     |     +-purrr:::call_with_cleanup(...)
    

29.     |     \-OmopSketch (local) .f(.x[[i]], ...)
    

30.     |       +-dplyr::select(...)
    

31.     |       +-dplyr::mutate(...)
    

32.     |       +-tidyr::separate(...)
    

33.     |       +-tidyr::pivot_longer(...)
    

34.     |       +-dplyr::select(...)
    

35.     |       +-dplyr::rename_with(...)
    

36.     |       +-dplyr::mutate(...)
    

37.     |       +-dplyr::mutate(...)
    

38.     |       +-dplyr::collect(...)
    

39.     |       +-dplyr::summarise(...)
    

40.     |       \-dplyr::group_by(x, dplyr::across(dplyr::all_of(stratak)))
    

41.     +-OmopSketch:::addStratifications(...)
    

42.     | \-OmopSketch:::addSexAgeGroup(...)
    

43.     |   \-omopgenerics::cdmReference(x)
    

44.     |     \-omopgenerics::assertClass(table, "cdm_table")
    

45.     |       +-omopgenerics:::checkClass(...)
    

46.     |       +-omopgenerics:::checkLength(...)
    

47.     |       +-omopgenerics:::checkNull(createCheckObject(x), null)
    

48.     |       \-omopgenerics:::createCheckObject(x)
    

49.     \-OmopSketch:::sampleOmopTable(omopTable, sample = sample, name = omopgenerics::uniqueTableName(prefix))
    

50.       +-dplyr::as_tibble(...)
    

51.       +-rlang::set_names(...)
    

52.       +-base::sample(dplyr::pull(x, dplyr::all_of(id)), size = sample)
    

53.       +-dplyr::pull(x, dplyr::all_of(id))
    

54.       \-dbplyr:::pull.tbl_sql(x, dplyr::all_of(id))
    

55.         +-dplyr::collect(.data) at dbplyr/R/verb-pull.R:29:3
    

56.         \-omopgenerics:::collect.cdm_table(.data)
    

57.           +-dplyr::collect(x)
    

58.           \-dbplyr:::collect.tbl_sql(x)
    

59.             +-base::withCallingHandlers(...) at dbplyr/R/verb-compute.R:131:3
    

60.             +-dbplyr::db_collect(...) at dbplyr/R/verb-compute.R:131:3
    

61.             \-dbplyr:::db_collect.DBIConnection(...) at dbplyr/R/db-io.R:158:3
    

62.               +-DBI::dbFetch(res, n = n) at dbplyr/R/db-io.R:165:3
    

63.               \-odbc::dbFetch(res, n = n)
    

64.                 \-odbc:::result_fetch(res@ptr, n)`