Last updated on 2023-02-06 00:52:27 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 1.0.0 | 40.55 | 231.14 | 271.69 | ERROR | |
| r-devel-linux-x86_64-debian-gcc | 1.0.0 | 28.42 | 171.51 | 199.93 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 1.0.0 | 353.74 | ERROR | |||
| r-devel-linux-x86_64-fedora-gcc | 1.0.0 | 334.25 | ERROR | |||
| r-devel-windows-x86_64 | 1.0.0 | 75.00 | 283.00 | 358.00 | ERROR | |
| r-patched-linux-x86_64 | 1.0.0 | 39.52 | 217.95 | 257.47 | ERROR | |
| r-release-linux-x86_64 | 1.0.0 | 34.93 | 217.55 | 252.48 | ERROR | |
| r-release-macos-arm64 | 1.0.0 | 87.00 | NOTE | |||
| r-release-macos-x86_64 | 1.0.0 | 111.00 | NOTE | |||
| r-release-windows-x86_64 | 1.0.0 | 81.00 | 287.00 | 368.00 | NOTE | |
| r-oldrel-macos-arm64 | 1.0.0 | 80.00 | NOTE | |||
| r-oldrel-macos-x86_64 | 1.0.0 | 117.00 | NOTE | |||
| r-oldrel-windows-ix86+x86_64 | 1.0.0 | 103.00 | 367.00 | 470.00 | ERROR |
Version: 1.0.0
Check: package dependencies
Result: NOTE
Package suggested but not available for checking: ‘exuberdata’
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-patched-linux-x86_64, r-release-linux-x86_64, r-release-macos-arm64, r-release-macos-x86_64, r-release-windows-x86_64, r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-ix86+x86_64
Version: 1.0.0
Check: C++ specification
Result: NOTE
Specified C++11: please update to current default of C++17
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘spelling.R’ [0s/1s]
Running ‘testthat.R’ [69s/86s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(exuber)
>
> test_check("exuber")
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
══ Skipped tests ═══════════════════════════════════════════════════════════════
• On CRAN (1)
• Removed fortify (1)
• TRUE (2)
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-autoplot.R:25'): wb ──────────────────────────────────────────
`autoplot(radf_dta, cv = wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, cv = wb), regexp = NA) at test-autoplot.R:25: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, cv = wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, cv = wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-autoplot.R:27'): wb ──────────────────────────────────────────
`autoplot(radf_dta_lag1, cv = wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-autoplot.R:27: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, cv = wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, cv = wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:63'): no problem running rp/ds/dg (mc) ─────────────
`summary(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:64'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:65'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:66'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:67'): 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) Each row in `x` is expected to match at most 1 row in `y`.\nℹ Row 1 of `x` matches multiple rows.\nℹ If multiple matches are expected, set `multiple = \"all\"` to silence this\n 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:71'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:72'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:76'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:83'): no problem running summary (lag, mc) ─────────
`summary(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:84'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:85'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:86'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:87'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:88'): no problem running summary (lag, mc) ─────────
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:96'): no problem running summary (wb) ──────────────
`summary(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta, wb), regexp = NA) at test-summary.R:96: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:97'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta, wb), regexp = NA) at test-summary.R:97: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:98'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:98: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:99'): no problem running summary (wb) ──────────────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:99: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:100'): no problem running summary (wb) ─────────────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:100: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:101'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, wb), regexp = NA) at test-summary.R:101: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:102'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:102: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:109'): no problem running summary (lag,wb) ─────────
`summary(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta_lag1, wb), regexp = NA) at test-summary.R:109: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta_lag1, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:110'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta_lag1, wb), regexp = NA) at test-summary.R:110: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:111'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:111: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:112'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:112: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:113'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:113: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:114'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta_lag1, wb), regexp = NA) at test-summary.R:114: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:115'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:115: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:124'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:125'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:126'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:127'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:134'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:135'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:136'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:137'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:144'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:144: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:145'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:145: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:153'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:153: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:154'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:154: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-clang
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘spelling.R’ [0s/1s]
Running ‘testthat.R’ [50s/79s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(exuber)
>
> test_check("exuber")
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
══ Skipped tests ═══════════════════════════════════════════════════════════════
• On CRAN (1)
• Removed fortify (1)
• TRUE (2)
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-autoplot.R:25'): wb ──────────────────────────────────────────
`autoplot(radf_dta, cv = wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, cv = wb), regexp = NA) at test-autoplot.R:25: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, cv = wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, cv = wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-autoplot.R:27'): wb ──────────────────────────────────────────
`autoplot(radf_dta_lag1, cv = wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-autoplot.R:27: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, cv = wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, cv = wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:63'): no problem running rp/ds/dg (mc) ─────────────
`summary(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:64'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:65'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:66'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:67'): 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) Each row in `x` is expected to match at most 1 row in `y`.\nℹ Row 1 of `x` matches multiple rows.\nℹ If multiple matches are expected, set `multiple = \"all\"` to silence this\n 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:71'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:72'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:76'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:83'): no problem running summary (lag, mc) ─────────
`summary(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:84'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:85'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:86'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:87'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:88'): no problem running summary (lag, mc) ─────────
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:96'): no problem running summary (wb) ──────────────
`summary(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta, wb), regexp = NA) at test-summary.R:96: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:97'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta, wb), regexp = NA) at test-summary.R:97: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:98'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:98: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:99'): no problem running summary (wb) ──────────────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:99: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:100'): no problem running summary (wb) ─────────────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:100: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:101'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, wb), regexp = NA) at test-summary.R:101: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:102'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:102: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:109'): no problem running summary (lag,wb) ─────────
`summary(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta_lag1, wb), regexp = NA) at test-summary.R:109: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta_lag1, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:110'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta_lag1, wb), regexp = NA) at test-summary.R:110: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:111'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:111: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:112'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:112: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:113'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:113: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:114'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta_lag1, wb), regexp = NA) at test-summary.R:114: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:115'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:115: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:124'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:125'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:126'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:127'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:134'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:135'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:136'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:137'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:144'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:144: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:145'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:145: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:153'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:153: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:154'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:154: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘spelling.R’
Running ‘testthat.R’ [84s/256s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(exuber)
>
> test_check("exuber")
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
══ Skipped tests ═══════════════════════════════════════════════════════════════
• On CRAN (1)
• Removed fortify (1)
• TRUE (2)
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-autoplot.R:25'): wb ──────────────────────────────────────────
`autoplot(radf_dta, cv = wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, cv = wb), regexp = NA) at test-autoplot.R:25: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, cv = wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, cv = wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-autoplot.R:27'): wb ──────────────────────────────────────────
`autoplot(radf_dta_lag1, cv = wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-autoplot.R:27: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, cv = wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, cv = wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:63'): no problem running rp/ds/dg (mc) ─────────────
`summary(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:64'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:65'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:66'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:67'): 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) Each row in `x` is expected to match at most 1 row in `y`.\nℹ Row 1 of `x` matches multiple rows.\nℹ If multiple matches are expected, set `multiple = \"all\"` to silence this\n 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:71'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:72'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:76'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:83'): no problem running summary (lag, mc) ─────────
`summary(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:84'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:85'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:86'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:87'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:88'): no problem running summary (lag, mc) ─────────
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:96'): no problem running summary (wb) ──────────────
`summary(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta, wb), regexp = NA) at test-summary.R:96: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:97'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta, wb), regexp = NA) at test-summary.R:97: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:98'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:98: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:99'): no problem running summary (wb) ──────────────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:99: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:100'): no problem running summary (wb) ─────────────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:100: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:101'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, wb), regexp = NA) at test-summary.R:101: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:102'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:102: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:109'): no problem running summary (lag,wb) ─────────
`summary(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta_lag1, wb), regexp = NA) at test-summary.R:109: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta_lag1, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:110'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta_lag1, wb), regexp = NA) at test-summary.R:110: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:111'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:111: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:112'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:112: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:113'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:113: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:114'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta_lag1, wb), regexp = NA) at test-summary.R:114: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:115'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:115: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:124'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:125'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:126'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:127'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:134'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:135'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:136'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:137'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:144'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:144: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:145'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:145: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:153'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:153: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:154'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:154: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘spelling.R’
Running ‘testthat.R’ [78s/91s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(exuber)
>
> test_check("exuber")
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
══ Skipped tests ═══════════════════════════════════════════════════════════════
• On CRAN (1)
• Removed fortify (1)
• TRUE (2)
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-autoplot.R:25'): wb ──────────────────────────────────────────
`autoplot(radf_dta, cv = wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, cv = wb), regexp = NA) at test-autoplot.R:25: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, cv = wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, cv = wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-autoplot.R:27'): wb ──────────────────────────────────────────
`autoplot(radf_dta_lag1, cv = wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-autoplot.R:27: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, cv = wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, cv = wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:63'): no problem running rp/ds/dg (mc) ─────────────
`summary(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:64'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:65'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:66'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:67'): 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) Each row in `x` is expected to match at most 1 row in `y`.\nℹ Row 1 of `x` matches multiple rows.\nℹ If multiple matches are expected, set `multiple = \"all\"` to silence this\n 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:71'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:72'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:76'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:83'): no problem running summary (lag, mc) ─────────
`summary(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:84'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:85'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:86'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:87'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:88'): no problem running summary (lag, mc) ─────────
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:96'): no problem running summary (wb) ──────────────
`summary(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta, wb), regexp = NA) at test-summary.R:96: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:97'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta, wb), regexp = NA) at test-summary.R:97: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:98'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:98: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:99'): no problem running summary (wb) ──────────────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:99: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:100'): no problem running summary (wb) ─────────────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:100: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:101'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, wb), regexp = NA) at test-summary.R:101: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:102'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:102: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:109'): no problem running summary (lag,wb) ─────────
`summary(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta_lag1, wb), regexp = NA) at test-summary.R:109: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta_lag1, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:110'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta_lag1, wb), regexp = NA) at test-summary.R:110: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:111'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:111: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:112'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:112: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:113'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:113: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:114'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta_lag1, wb), regexp = NA) at test-summary.R:114: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:115'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:115: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:124'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:125'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:126'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:127'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:134'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:135'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:136'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:137'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:144'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:144: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:145'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:145: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:153'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:153: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:154'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:154: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 1.0.0
Check: tests
Result: ERROR
Running 'spelling.R' [0s]
Running 'testthat.R' [69s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(exuber)
>
> test_check("exuber")
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
══ Skipped tests ═══════════════════════════════════════════════════════════════
• On CRAN (1)
• Removed fortify (1)
• TRUE (2)
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-autoplot.R:25'): wb ──────────────────────────────────────────
`autoplot(radf_dta, cv = wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, cv = wb), regexp = NA) at test-autoplot.R:25: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, cv = wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, cv = wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-autoplot.R:27'): wb ──────────────────────────────────────────
`autoplot(radf_dta_lag1, cv = wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-autoplot.R:27: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, cv = wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, cv = wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:63'): no problem running rp/ds/dg (mc) ─────────────
`summary(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:64'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:65'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:66'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:67'): 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) Each row in `x` is expected to match at most 1 row in `y`.\nℹ Row 1 of `x` matches multiple rows.\nℹ If multiple matches are expected, set `multiple = \"all\"` to silence this\n 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:71'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:72'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:76'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:83'): no problem running summary (lag, mc) ─────────
`summary(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:84'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:85'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:86'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:87'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:88'): no problem running summary (lag, mc) ─────────
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:96'): no problem running summary (wb) ──────────────
`summary(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta, wb), regexp = NA) at test-summary.R:96: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:97'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta, wb), regexp = NA) at test-summary.R:97: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:98'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:98: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:99'): no problem running summary (wb) ──────────────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:99: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:100'): no problem running summary (wb) ─────────────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:100: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:101'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, wb), regexp = NA) at test-summary.R:101: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:102'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:102: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:109'): no problem running summary (lag,wb) ─────────
`summary(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta_lag1, wb), regexp = NA) at test-summary.R:109: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta_lag1, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:110'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta_lag1, wb), regexp = NA) at test-summary.R:110: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:111'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:111: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:112'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:112: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:113'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:113: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:114'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta_lag1, wb), regexp = NA) at test-summary.R:114: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:115'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:115: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:124'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:125'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:126'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:127'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:134'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:135'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:136'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:137'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:144'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:144: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:145'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:145: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:153'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:153: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:154'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:154: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
Error: Test failures
Execution halted
Flavor: r-devel-windows-x86_64
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘spelling.R’ [0s/1s]
Running ‘testthat.R’ [64s/71s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(exuber)
>
> test_check("exuber")
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
══ Skipped tests ═══════════════════════════════════════════════════════════════
• On CRAN (1)
• Removed fortify (1)
• TRUE (2)
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-autoplot.R:25'): wb ──────────────────────────────────────────
`autoplot(radf_dta, cv = wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, cv = wb), regexp = NA) at test-autoplot.R:25: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, cv = wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, cv = wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-autoplot.R:27'): wb ──────────────────────────────────────────
`autoplot(radf_dta_lag1, cv = wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-autoplot.R:27: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, cv = wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, cv = wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:63'): no problem running rp/ds/dg (mc) ─────────────
`summary(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:64'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:65'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:66'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:67'): 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) Each row in `x` is expected to match at most 1 row in `y`.\nℹ Row 1 of `x` matches multiple rows.\nℹ If multiple matches are expected, set `multiple = \"all\"` to silence this\n 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:71'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:72'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:76'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:83'): no problem running summary (lag, mc) ─────────
`summary(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:84'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:85'): no problem running summary (lag, mc) ─────────
`diagnostics(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:86'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:87'): no problem running summary (lag, mc) ─────────
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:88'): no problem running summary (lag, mc) ─────────
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:96'): no problem running summary (wb) ──────────────
`summary(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta, wb), regexp = NA) at test-summary.R:96: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:97'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta, wb), regexp = NA) at test-summary.R:97: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:98'): no problem running summary (wb) ──────────────
`diagnostics(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:98: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:99'): no problem running summary (wb) ──────────────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:99: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:100'): no problem running summary (wb) ─────────────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:100: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:101'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, wb), regexp = NA) at test-summary.R:101: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:102'): no problem running summary (wb) ─────────────
`autoplot(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:102: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:109'): no problem running summary (lag,wb) ─────────
`summary(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(summary(radf_dta_lag1, wb), regexp = NA) at test-summary.R:109: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, wb)
7. ├─exuber:::summary.radf_obj(radf_dta_lag1, wb)
8. │ ├─exuber:::summary_radf(cv, object, ...)
9. │ └─exuber:::summary_radf.wb_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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:110'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(diagnostics(radf_dta_lag1, wb), regexp = NA) at test-summary.R:110: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, wb)
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:111'): no problem running summary (lag,wb) ─────────
`diagnostics(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:111: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, wb, option = "sadf")
7. ├─exuber:::diagnostics.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:112'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:112: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:113'): no problem running summary (lag,wb) ─────────
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:113: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:114'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta_lag1, wb), regexp = NA) at test-summary.R:114: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, wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:115'): no problem running summary (lag,wb) ─────────
`autoplot(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:115: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, wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:124'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:125'): no problem running with (date, mc) ──────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:126'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:127'): no problem running with (date, mc) ──────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:134'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:135'): no problem running summary with (date, lag, mc) ──
`datestamp(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:136'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:137'): no problem running summary with (date, lag, mc) ──
`autoplot(radf_dta_lag1, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:144'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta, wb), regexp = NA) at test-summary.R:144: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:145'): no problem running summary (date, wb) ───────
`datestamp(radf_dta, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:145: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:153'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(datestamp(radf_dta_lag1, wb), regexp = NA) at test-summary.R:153: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, wb)
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:154'): no problem running summary (date, lag, wb) ──
`datestamp(radf_dta_lag1, wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-summary.R:154: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, wb, option = "sadf")
7. ├─exuber:::datestamp.radf_obj(radf_dta_lag1, wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
Error: Test failures
Execution halted
Flavor: r-patched-linux-x86_64
Version: 1.0.0
Check: tests
Result: ERROR
Running ‘spelling.R’ [0s/0s]
Running ‘testthat.R’ [65s/69s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(exuber)
>
> test_check("exuber")
[ FAIL 42 | WARN 57 | SKIP 4 | PASS 194 ]
══ Skipped tests ═══════════════════════════════════════════════════════════════
• On CRAN (1)
• Removed fortify (1)
• TRUE (2)
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-autoplot.R:25'): wb ──────────────────────────────────────────
`autoplot(radf_dta, cv = wb)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(autoplot(radf_dta, cv = wb), regexp = NA) at test-autoplot.R:25: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, cv = wb)
7. ├─exuber:::autoplot.radf_obj(radf_dta, cv = wb)
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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-autoplot.R:27'): wb ──────────────────────────────────────────
`autoplot(radf_dta_lag1, cv = wb, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
Class: simpleError/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(...) at test-autoplot.R:27: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, cv = wb, option = "sadf")
7. ├─exuber:::autoplot.radf_obj(radf_dta_lag1, cv = wb, 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:63'): no problem running rp/ds/dg (mc) ─────────────
`summary(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
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>`(`<vctrs___>`)
33. └─dplyr:::rethrow_warning_join_matches_multiple(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:64'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:65'): no problem running rp/ds/dg (mc) ─────────────
`diagnostics(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
24. │ └─vctrs:::warn_matches(...)
25. │ └─vctrs:::warn_vctrs(...)
26. │ └─rlang::warn(...)
27. │ └─base::warning(cnd)
28. │ └─base::withRestarts(...)
29. │ └─base (local) withOneRestart(expr, restarts[[1L]])
30. │ └─base (local) doWithOneRestart(return(expr), restart)
31. └─dplyr (local) `<fn>`(`<vctrs___>`)
32. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
33. └─dplyr:::warn_join(...)
34. └─dplyr:::warn_dplyr(...)
35. └─rlang::warn(...)
36. └─base::warning(cnd)
37. └─base::withRestarts(...)
38. └─base (local) withOneRestart(expr, restarts[[1L]])
39. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:66'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:67'): 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) Each row in `x` is expected to match at most 1 row in `y`.\nℹ Row 1 of `x` matches multiple rows.\nℹ If multiple matches are expected, set `multiple = \"all\"` to silence this\n 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:71'): no problem running rp/ds/dg (mc) ─────────────
`datestamp(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:72'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc)` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` 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_multiple(...)
27. │ └─vctrs:::warn_matches(...)
28. │ └─vctrs:::warn_vctrs(...)
29. │ └─rlang::warn(...)
30. │ └─base::warning(cnd)
31. │ └─base::withRestarts(...)
32. │ └─base (local) withOneRestart(expr, restarts[[1L]])
33. │ └─base (local) doWithOneRestart(return(expr), restart)
34. └─dplyr (local) `<fn>`(`<vctrs___>`)
35. └─dplyr:::rethrow_warning_join_matches_multiple(cnd, error_call)
36. └─dplyr:::warn_join(...)
37. └─dplyr:::warn_dplyr(...)
38. └─rlang::warn(...)
39. └─base::warning(cnd)
40. └─base::withRestarts(...)
41. └─base (local) withOneRestart(expr, restarts[[1L]])
42. └─base (local) doWithOneRestart(return(expr), restart)
── Failure ('test-summary.R:76'): no problem running rp/ds/dg (mc) ─────────────
`autoplot(radf_dta, mc, option = "sadf")` threw an error.
Message: (converted from warning) Each row in `x` is expected to match at most 1 row in `y`.
ℹ Row 1 of `x` matches multiple rows.
ℹ If multiple matches are expected, set `multiple = "all"` to silence this
warning.
&nbs