Running ‘spelling.R’ [0s/1s]
  Running ‘testthat.R’ [53s/64s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(exuber)
  > 
  > test_check("exuber")
  [ FAIL 22 | WARN 29 | SKIP 4 | PASS 214 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (1)
  • Removed fortify (1)
  • TRUE (2)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Failure ('test-summary.R:63:5'): no problem running rp/ds/dg (mc) ───────────
  `summary(radf_dta, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(summary(radf_dta, mc), regexp = NA) at test-summary.R:63:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─base::summary(radf_dta, mc)
    7. ├─exuber:::summary.radf_obj(radf_dta, mc)
    8. │ ├─exuber:::summary_radf(cv, object, ...)
    9. │ └─exuber:::summary_radf.mc_cv(cv, object, ...)
   10. │   ├─tidy_join(object, cv) %>% ...
   11. │   ├─exuber::tidy_join(object, cv)
   12. │   └─exuber:::tidy_join.radf_obj(object, cv)
   13. │     ├─... %>% arrange(id, stat)
   14. │     ├─dplyr::full_join(...)
   15. │     └─dplyr:::full_join.data.frame(...)
   16. │       └─dplyr:::join_mutate(...)
   17. │         └─dplyr:::join_rows(...)
   18. │           └─dplyr:::dplyr_locate_matches(...)
   19. │             ├─base::withCallingHandlers(...)
   20. │             └─vctrs::vec_locate_matches(...)
   21. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit)
   22. ├─dplyr::arrange(., id, stat)
   23. ├─dplyr::mutate(...)
   24. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   25. │ └─vctrs:::warn_matches_relationship(...)
   26. │   └─vctrs:::warn_matches(...)
   27. │     └─vctrs:::warn_vctrs(...)
   28. │       └─rlang::warn(...)
   29. │         └─base::warning(cnd)
   30. │           └─base::withRestarts(...)
   31. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   32. │               └─base (local) doWithOneRestart(return(expr), restart)
   33. └─dplyr (local) `<fn>`(`<vc______>`)
   34.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   35.     └─dplyr:::warn_join(...)
   36.       └─dplyr:::warn_dplyr(...)
   37.         └─rlang::warn(...)
   38.           └─base::warning(cnd)
   39.             └─base::withRestarts(...)
   40.               └─base (local) withOneRestart(expr, restarts[[1L]])
   41.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:64:5'): no problem running rp/ds/dg (mc) ───────────
  `diagnostics(radf_dta, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(diagnostics(radf_dta, mc), regexp = NA) at test-summary.R:64:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::diagnostics(radf_dta, mc)
    7. ├─exuber:::diagnostics.radf_obj(radf_dta, mc)
    8. │ ├─... %>% filter(stat == option)
    9. │ ├─exuber::tidy_join(object, cv)
   10. │ └─exuber:::tidy_join.radf_obj(object, cv)
   11. │   ├─... %>% arrange(id, stat)
   12. │   ├─dplyr::full_join(...)
   13. │   └─dplyr:::full_join.data.frame(...)
   14. │     └─dplyr:::join_mutate(...)
   15. │       └─dplyr:::join_rows(...)
   16. │         └─dplyr:::dplyr_locate_matches(...)
   17. │           ├─base::withCallingHandlers(...)
   18. │           └─vctrs::vec_locate_matches(...)
   19. ├─dplyr::filter(., stat == option)
   20. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   21. ├─dplyr::arrange(., id, stat)
   22. ├─dplyr::mutate(...)
   23. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   24. │ └─vctrs:::warn_matches_relationship(...)
   25. │   └─vctrs:::warn_matches(...)
   26. │     └─vctrs:::warn_vctrs(...)
   27. │       └─rlang::warn(...)
   28. │         └─base::warning(cnd)
   29. │           └─base::withRestarts(...)
   30. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   31. │               └─base (local) doWithOneRestart(return(expr), restart)
   32. └─dplyr (local) `<fn>`(`<vc______>`)
   33.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   34.     └─dplyr:::warn_join(...)
   35.       └─dplyr:::warn_dplyr(...)
   36.         └─rlang::warn(...)
   37.           └─base::warning(cnd)
   38.             └─base::withRestarts(...)
   39.               └─base (local) withOneRestart(expr, restarts[[1L]])
   40.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:65:5'): no problem running rp/ds/dg (mc) ───────────
  `diagnostics(radf_dta, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:65:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::diagnostics(radf_dta, mc, option = "sadf")
    7. ├─exuber:::diagnostics.radf_obj(radf_dta, mc, option = "sadf")
    8. │ ├─... %>% filter(stat == option)
    9. │ ├─exuber::tidy_join(object, cv)
   10. │ └─exuber:::tidy_join.radf_obj(object, cv)
   11. │   ├─... %>% arrange(id, stat)
   12. │   ├─dplyr::full_join(...)
   13. │   └─dplyr:::full_join.data.frame(...)
   14. │     └─dplyr:::join_mutate(...)
   15. │       └─dplyr:::join_rows(...)
   16. │         └─dplyr:::dplyr_locate_matches(...)
   17. │           ├─base::withCallingHandlers(...)
   18. │           └─vctrs::vec_locate_matches(...)
   19. ├─dplyr::filter(., stat == option)
   20. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   21. ├─dplyr::arrange(., id, stat)
   22. ├─dplyr::mutate(...)
   23. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   24. │ └─vctrs:::warn_matches_relationship(...)
   25. │   └─vctrs:::warn_matches(...)
   26. │     └─vctrs:::warn_vctrs(...)
   27. │       └─rlang::warn(...)
   28. │         └─base::warning(cnd)
   29. │           └─base::withRestarts(...)
   30. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   31. │               └─base (local) doWithOneRestart(return(expr), restart)
   32. └─dplyr (local) `<fn>`(`<vc______>`)
   33.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   34.     └─dplyr:::warn_join(...)
   35.       └─dplyr:::warn_dplyr(...)
   36.         └─rlang::warn(...)
   37.           └─base::warning(cnd)
   38.             └─base::withRestarts(...)
   39.               └─base (local) withOneRestart(expr, restarts[[1L]])
   40.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:66:5'): no problem running rp/ds/dg (mc) ───────────
  `datestamp(radf_dta, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(datestamp(radf_dta, mc), regexp = NA) at test-summary.R:66:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta, mc)
    7. ├─exuber:::datestamp.radf_obj(radf_dta, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:67:5'): no problem running rp/ds/dg (mc) ───────────
  `datestamp(radf_dta, mc, min_duration = 50)` threw an error with unexpected message.
  Expected match: "Argument 'min_duration' excludes all explosive periods"
  Actual message: "(converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.\nℹ Row 1 of `x` matches multiple rows in `y`.\nℹ Row 1 of `y` matches multiple rows in `x`.\nℹ If a many-to-many relationship is expected, set `relationship =\n  \"many-to-many\"` to silence this warning."
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:67:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta, mc, min_duration = 50)
    7. ├─exuber:::datestamp.radf_obj(radf_dta, mc, min_duration = 50)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:71:5'): no problem running rp/ds/dg (mc) ───────────
  `datestamp(radf_dta, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:71:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta, mc, option = "sadf")
    7. ├─exuber:::datestamp.radf_obj(radf_dta, mc, option = "sadf")
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:72:5'): no problem running rp/ds/dg (mc) ───────────
  `autoplot(radf_dta, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(autoplot(radf_dta, mc), regexp = NA) at test-summary.R:72:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─ggplot2::autoplot(radf_dta, mc)
    7. ├─exuber:::autoplot.radf_obj(radf_dta, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:76:5'): no problem running rp/ds/dg (mc) ───────────
  `autoplot(radf_dta, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:76:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─ggplot2::autoplot(radf_dta, mc, option = "sadf")
    7. ├─exuber:::autoplot.radf_obj(radf_dta, mc, option = "sadf")
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:83:5'): no problem running summary (lag, mc) ───────
  `summary(radf_dta_lag1, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(summary(radf_dta_lag1, mc), regexp = NA) at test-summary.R:83:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─base::summary(radf_dta_lag1, mc)
    7. ├─exuber:::summary.radf_obj(radf_dta_lag1, mc)
    8. │ ├─exuber:::summary_radf(cv, object, ...)
    9. │ └─exuber:::summary_radf.mc_cv(cv, object, ...)
   10. │   ├─tidy_join(object, cv) %>% ...
   11. │   ├─exuber::tidy_join(object, cv)
   12. │   └─exuber:::tidy_join.radf_obj(object, cv)
   13. │     ├─... %>% arrange(id, stat)
   14. │     ├─dplyr::full_join(...)
   15. │     └─dplyr:::full_join.data.frame(...)
   16. │       └─dplyr:::join_mutate(...)
   17. │         └─dplyr:::join_rows(...)
   18. │           └─dplyr:::dplyr_locate_matches(...)
   19. │             ├─base::withCallingHandlers(...)
   20. │             └─vctrs::vec_locate_matches(...)
   21. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit)
   22. ├─dplyr::arrange(., id, stat)
   23. ├─dplyr::mutate(...)
   24. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   25. │ └─vctrs:::warn_matches_relationship(...)
   26. │   └─vctrs:::warn_matches(...)
   27. │     └─vctrs:::warn_vctrs(...)
   28. │       └─rlang::warn(...)
   29. │         └─base::warning(cnd)
   30. │           └─base::withRestarts(...)
   31. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   32. │               └─base (local) doWithOneRestart(return(expr), restart)
   33. └─dplyr (local) `<fn>`(`<vc______>`)
   34.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   35.     └─dplyr:::warn_join(...)
   36.       └─dplyr:::warn_dplyr(...)
   37.         └─rlang::warn(...)
   38.           └─base::warning(cnd)
   39.             └─base::withRestarts(...)
   40.               └─base (local) withOneRestart(expr, restarts[[1L]])
   41.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:84:5'): no problem running summary (lag, mc) ───────
  `diagnostics(radf_dta_lag1, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(diagnostics(radf_dta_lag1, mc), regexp = NA) at test-summary.R:84:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::diagnostics(radf_dta_lag1, mc)
    7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, mc)
    8. │ ├─... %>% filter(stat == option)
    9. │ ├─exuber::tidy_join(object, cv)
   10. │ └─exuber:::tidy_join.radf_obj(object, cv)
   11. │   ├─... %>% arrange(id, stat)
   12. │   ├─dplyr::full_join(...)
   13. │   └─dplyr:::full_join.data.frame(...)
   14. │     └─dplyr:::join_mutate(...)
   15. │       └─dplyr:::join_rows(...)
   16. │         └─dplyr:::dplyr_locate_matches(...)
   17. │           ├─base::withCallingHandlers(...)
   18. │           └─vctrs::vec_locate_matches(...)
   19. ├─dplyr::filter(., stat == option)
   20. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   21. ├─dplyr::arrange(., id, stat)
   22. ├─dplyr::mutate(...)
   23. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   24. │ └─vctrs:::warn_matches_relationship(...)
   25. │   └─vctrs:::warn_matches(...)
   26. │     └─vctrs:::warn_vctrs(...)
   27. │       └─rlang::warn(...)
   28. │         └─base::warning(cnd)
   29. │           └─base::withRestarts(...)
   30. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   31. │               └─base (local) doWithOneRestart(return(expr), restart)
   32. └─dplyr (local) `<fn>`(`<vc______>`)
   33.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   34.     └─dplyr:::warn_join(...)
   35.       └─dplyr:::warn_dplyr(...)
   36.         └─rlang::warn(...)
   37.           └─base::warning(cnd)
   38.             └─base::withRestarts(...)
   39.               └─base (local) withOneRestart(expr, restarts[[1L]])
   40.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:85:5'): no problem running summary (lag, mc) ───────
  `diagnostics(radf_dta_lag1, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:85:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::diagnostics(radf_dta_lag1, mc, option = "sadf")
    7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, mc, option = "sadf")
    8. │ ├─... %>% filter(stat == option)
    9. │ ├─exuber::tidy_join(object, cv)
   10. │ └─exuber:::tidy_join.radf_obj(object, cv)
   11. │   ├─... %>% arrange(id, stat)
   12. │   ├─dplyr::full_join(...)
   13. │   └─dplyr:::full_join.data.frame(...)
   14. │     └─dplyr:::join_mutate(...)
   15. │       └─dplyr:::join_rows(...)
   16. │         └─dplyr:::dplyr_locate_matches(...)
   17. │           ├─base::withCallingHandlers(...)
   18. │           └─vctrs::vec_locate_matches(...)
   19. ├─dplyr::filter(., stat == option)
   20. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   21. ├─dplyr::arrange(., id, stat)
   22. ├─dplyr::mutate(...)
   23. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   24. │ └─vctrs:::warn_matches_relationship(...)
   25. │   └─vctrs:::warn_matches(...)
   26. │     └─vctrs:::warn_vctrs(...)
   27. │       └─rlang::warn(...)
   28. │         └─base::warning(cnd)
   29. │           └─base::withRestarts(...)
   30. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   31. │               └─base (local) doWithOneRestart(return(expr), restart)
   32. └─dplyr (local) `<fn>`(`<vc______>`)
   33.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   34.     └─dplyr:::warn_join(...)
   35.       └─dplyr:::warn_dplyr(...)
   36.         └─rlang::warn(...)
   37.           └─base::warning(cnd)
   38.             └─base::withRestarts(...)
   39.               └─base (local) withOneRestart(expr, restarts[[1L]])
   40.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:86:5'): no problem running summary (lag, mc) ───────
  `datestamp(radf_dta_lag1, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(datestamp(radf_dta_lag1, mc), regexp = NA) at test-summary.R:86:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta_lag1, mc)
    7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:87:5'): no problem running summary (lag, mc) ───────
  `datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:87:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta_lag1, mc, option = "sadf")
    7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, mc, option = "sadf")
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:88:5'): no problem running summary (lag, mc) ───────
  `autoplot(radf_dta_lag1, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(autoplot(radf_dta_lag1, mc), regexp = NA) at test-summary.R:88:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─ggplot2::autoplot(radf_dta_lag1, mc)
    7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:124:5'): no problem running with (date, mc) ────────
  `datestamp(radf_dta, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(datestamp(radf_dta, mc), regexp = NA) at test-summary.R:124:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta, mc)
    7. ├─exuber:::datestamp.radf_obj(radf_dta, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:125:5'): no problem running with (date, mc) ────────
  `datestamp(radf_dta, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:125:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta, mc, option = "sadf")
    7. ├─exuber:::datestamp.radf_obj(radf_dta, mc, option = "sadf")
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:126:5'): no problem running with (date, mc) ────────
  `autoplot(radf_dta, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(autoplot(radf_dta, mc), regexp = NA) at test-summary.R:126:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─ggplot2::autoplot(radf_dta, mc)
    7. ├─exuber:::autoplot.radf_obj(radf_dta, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:127:5'): no problem running with (date, mc) ────────
  `autoplot(radf_dta, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:127:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─ggplot2::autoplot(radf_dta, mc, option = "sadf")
    7. ├─exuber:::autoplot.radf_obj(radf_dta, mc, option = "sadf")
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:134:5'): no problem running summary with (date, lag, mc) ──
  `datestamp(radf_dta_lag1, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(datestamp(radf_dta_lag1, mc), regexp = NA) at test-summary.R:134:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta_lag1, mc)
    7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:135:5'): no problem running summary with (date, lag, mc) ──
  `datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:135:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─exuber::datestamp(radf_dta_lag1, mc, option = "sadf")
    7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, mc, option = "sadf")
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:136:5'): no problem running summary with (date, lag, mc) ──
  `autoplot(radf_dta_lag1, mc)` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(autoplot(radf_dta_lag1, mc), regexp = NA) at test-summary.R:136:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─ggplot2::autoplot(radf_dta_lag1, mc)
    7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, mc)
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  ── Failure ('test-summary.R:137:5'): no problem running summary with (date, lag, mc) ──
  `autoplot(radf_dta_lag1, mc, option = "sadf")` threw an error.
  Message: (converted from warning) Detected an unexpected many-to-many relationship between `x` and `y`.
  ℹ Row 1 of `x` matches multiple rows in `y`.
  ℹ Row 1 of `y` matches multiple rows in `x`.
  ℹ If a many-to-many relationship is expected, set `relationship =
    "many-to-many"` to silence this warning.
  Class:   simpleError/error/condition
  Backtrace:
       ▆
    1. ├─testthat::expect_error(...) at test-summary.R:137:4
    2. │ └─testthat:::quasi_capture(...)
    3. │   ├─testthat (local) .capture(...)
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
    6. ├─ggplot2::autoplot(radf_dta_lag1, mc, option = "sadf")
    7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, mc, option = "sadf")
    8. │ └─exuber:::diagnostics_internal(object, cv)
    9. │   ├─exuber::diagnostics(...)
   10. │   └─exuber:::diagnostics.radf_obj(...)
   11. │     ├─... %>% filter(stat == option)
   12. │     ├─exuber::tidy_join(object, cv)
   13. │     └─exuber:::tidy_join.radf_obj(object, cv)
   14. │       ├─... %>% arrange(id, stat)
   15. │       ├─dplyr::full_join(...)
   16. │       └─dplyr:::full_join.data.frame(...)
   17. │         └─dplyr:::join_mutate(...)
   18. │           └─dplyr:::join_rows(...)
   19. │             └─dplyr:::dplyr_locate_matches(...)
   20. │               ├─base::withCallingHandlers(...)
   21. │               └─vctrs::vec_locate_matches(...)
   22. ├─dplyr::filter(., stat == option)
   23. ├─tidyr::pivot_wider(., names_from = sig, values_from = crit, names_prefix = "cv")
   24. ├─dplyr::arrange(., id, stat)
   25. ├─dplyr::mutate(...)
   26. ├─vctrs:::warn_matches_relationship_many_to_many(...)
   27. │ └─vctrs:::warn_matches_relationship(...)
   28. │   └─vctrs:::warn_matches(...)
   29. │     └─vctrs:::warn_vctrs(...)
   30. │       └─rlang::warn(...)
   31. │         └─base::warning(cnd)
   32. │           └─base::withRestarts(...)
   33. │             └─base (local) withOneRestart(expr, restarts[[1L]])
   34. │               └─base (local) doWithOneRestart(return(expr), restart)
   35. └─dplyr (local) `<fn>`(`<vc______>`)
   36.   └─dplyr:::rethrow_warning_join_relationship_many_to_many(cnd, error_call)
   37.     └─dplyr:::warn_join(...)
   38.       └─dplyr:::warn_dplyr(...)
   39.         └─rlang::warn(...)
   40.           └─base::warning(cnd)
   41.             └─base::withRestarts(...)
   42.               └─base (local) withOneRestart(expr, restarts[[1L]])
   43.                 └─base (local) doWithOneRestart(return(expr), restart)
  
  [ FAIL 22 | WARN 29 | SKIP 4 | PASS 214 ]
  Error: Test failures
  Execution halted