Last updated on 2025-12-08 13:48:51 CET.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.2.12 | 7.00 | 132.20 | 139.20 | OK | |
| r-devel-linux-x86_64-debian-gcc | 0.2.12 | 4.50 | 86.54 | 91.04 | OK | |
| r-devel-linux-x86_64-fedora-clang | 0.2.12 | 21.00 | 97.77 | 118.77 | ERROR | |
| r-devel-linux-x86_64-fedora-gcc | 0.2.12 | 29.00 | 102.86 | 131.86 | ERROR | |
| r-devel-windows-x86_64 | 0.2.12 | 8.00 | 133.00 | 141.00 | OK | |
| r-patched-linux-x86_64 | 0.2.12 | 6.66 | 123.81 | 130.47 | OK | |
| r-release-linux-x86_64 | 0.2.12 | 6.09 | 123.54 | 129.63 | OK | |
| r-release-macos-arm64 | 0.2.12 | OK | ||||
| r-release-macos-x86_64 | 0.2.12 | 5.00 | 170.00 | 175.00 | OK | |
| r-release-windows-x86_64 | 0.2.12 | 8.00 | 131.00 | 139.00 | OK | |
| r-oldrel-macos-arm64 | 0.2.12 | OK | ||||
| r-oldrel-macos-x86_64 | 0.2.12 | 5.00 | 163.00 | 168.00 | OK | |
| r-oldrel-windows-x86_64 | 0.2.12 | 12.00 | 177.00 | 189.00 | OK |
Version: 0.2.12
Check: examples
Result: ERROR
Running examples in ‘rlistings-Ex.R’ failed
The error most likely occurred in:
> ### Name: as_listing
> ### Title: Create a listing from a 'data.frame' or 'tibble'
> ### Aliases: as_listing spanning_col_label_df spanning_col_label_df<-
> ### as_keycol is_keycol get_keycols listing_dispcols add_listing_dispcol
> ### listing_dispcols<- align_colnames align_colnames<- add_listing_col
>
> ### ** Examples
>
> dat <- ex_adae
>
> # This example demonstrates the listing with key_cols (values are grouped by USUBJID) and
> # multiple lines in prov_footer
> lsting <- as_listing(dat[1:25, ],
+ key_cols = c("USUBJID", "AESOC"),
+ main_title = "Example Title for Listing",
+ subtitles = "This is the subtitle for this Adverse Events Table",
+ main_footer = "Main footer for the listing",
+ prov_footer = c(
+ "You can even add a subfooter", "Second element is place on a new line",
+ "Third string"
+ )
+ ) %>%
+ add_listing_col("AETOXGR") %>%
+ add_listing_col("BMRKR1", format = "xx.x") %>%
+ add_listing_col("AESER / AREL", fun = function(df) paste(df$AESER, df$AREL, sep = " / "))
>
> mat <- matrix_form(lsting)
Error in match.arg(round_type) : 'arg' must be of length 1
Calls: matrix_form ... matrix_form -> .local -> vapply -> FUN -> match.arg
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.2.12
Check: tests
Result: ERROR
Running ‘testthat.R’ [11s/13s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(rlistings)
Loading required package: formatters
Attaching package: 'formatters'
The following object is masked from 'package:base':
%||%
Loading required package: tibble
> library(testthat)
>
> testthat::test_check("rlistings", reporter = "check")
Attaching package: 'dplyr'
The following objects are masked from 'package:stats':
filter, lag
The following objects are masked from 'package:base':
intersect, setdiff, setequal, union
Saving _problems/test-export-24.R
Saving _problems/test-export-40.R
Saving _problems/test-export-48.R
Saving _problems/test-export-68.R
Saving _problems/test-export-91.R
Saving _problems/test-export-101.R
Saving _problems/test-export-113.R
Saving _problems/test-listings-8.R
Saving _problems/test-listings-36.R
Saving _problems/test-listings-106.R
Saving _problems/test-listings-142.R
Saving _problems/test-listings-225.R
Saving _problems/test-listings-259.R
Saving _problems/test-listings-281.R
Saving _problems/test-listings-386.R
Saving _problems/test-matrix_form-13.R
Saving _problems/test-matrix_form-56.R
Saving _problems/test-matrix_form-85.R
Saving _problems/test-paginate_listing-16.R
Saving _problems/test-paginate_listing-44.R
Saving _problems/test-paginate_listing-107.R
Saving _problems/test-paginate_listing-131.R
Saving _problems/test-paginate_listing-144.R
Saving _problems/test-paginate_listing-151.R
Saving _problems/test-paginate_listing-162.R
Saving _problems/test-paginate_listing-169.R
Saving _problems/test-paginate_listing-176.R
Saving _problems/test-paginate_listing-217.R
Saving _problems/test-paginate_listing-256.R
Saving _problems/test-paginate_listing-269.R
Saving _problems/test-paginate_listing-306.R
Saving _problems/test-paginate_listing-347.R
Saving _problems/test-paginate_listing-401.R
Saving _problems/test-print-5.R
Saving _problems/test-print-18.R
Saving _problems/test-print-37.R
Saving _problems/test-print-77.R
Saving _problems/test-print-140.R
Saving _problems/test-print-158.R
Saving _problems/test-print-172.R
Saving _problems/test-print-207.R
[ FAIL 44 | WARN 0 | SKIP 0 | PASS 24 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-export.R:6:5'): Listing print correctly ────────────────────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─testthat::expect_silent(...) at test-export.R:5:3
2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
3. │ ├─testthat (local) .capture(...)
4. │ │ ├─withr::with_output_sink(...)
5. │ │ │ └─base::force(code)
6. │ │ ├─base::withCallingHandlers(...)
7. │ │ └─base::withVisible(code)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─formatters::export_as_txt(lsting, file = NULL) at test-export.R:6:5
10. ├─formatters::paginate_to_mpfs(...)
11. │ ├─formatters::matrix_form(...)
12. │ └─rlistings::matrix_form(...)
13. │ └─rlistings (local) .local(...)
14. │ └─base::vapply(...)
15. │ └─formatters (local) FUN(X[[i]], ...)
16. │ └─base::match.arg(round_type)
17. ├─formatters::obj_round_type(x)
18. └─formatters::obj_round_type(x)
── Error ('test-export.R:24:3'): key columns repeat with export_as_txt ─────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─base::suppressMessages(...) at test-export.R:24:3
2. │ └─base::withCallingHandlers(...)
3. └─formatters::export_as_txt(lsting, lpp = 4, verbose = TRUE, page_break = "\n")
4. ├─formatters::paginate_to_mpfs(...)
5. │ ├─formatters::matrix_form(...)
6. │ └─rlistings::matrix_form(...)
7. │ └─rlistings (local) .local(...)
8. │ └─base::vapply(...)
9. │ └─formatters (local) FUN(X[[i]], ...)
10. │ └─base::match.arg(round_type)
11. ├─formatters::obj_round_type(x)
12. └─formatters::obj_round_type(x)
── Error ('test-export.R:37:3'): key columns repeat with pagination with export_as_txt ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(...) at test-export.R:37:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-export.R:48:3'): Listing print correctly, with paginate ────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(...) at test-export.R:48:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-export.R:68:3'): export_as_txt works and repeats the correct lines in pagination ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 33, cpp = 550, print_pages = FALSE) at test-export.R:68:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-export.R:91:3'): export_as_txt works with split_into_pages_by_var ──
Error in `obj_round_type(obj[[1]])`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(...) at test-export.R:91:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─base::unlist(...)
4. │ └─base::lapply(...)
5. │ └─formatters (local) FUN(X[[i]], ...)
6. │ └─base::eval(cur_call, envir = parent.frame(3L))
7. │ └─base::eval(cur_call, envir = parent.frame(3L))
8. ├─formatters::paginate_to_mpfs(...)
9. │ ├─formatters::matrix_form(...)
10. │ └─rlistings::matrix_form(...)
11. │ └─rlistings (local) .local(...)
12. │ └─base::vapply(...)
13. │ └─formatters (local) FUN(X[[i]], ...)
14. │ └─base::match.arg(round_type)
15. ├─formatters::obj_round_type(x)
16. └─formatters::obj_round_type(x)
17. ├─formatters::obj_round_type(obj[[1]])
18. └─formatters::obj_round_type(obj[[1]])
── Error ('test-export.R:101:3'): export_as_txt works with empty listings ──────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(lsting) at test-export.R:101:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-export.R:113:3'): export_as_txt works with listings with all key cols ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(lsting) at test-export.R:113:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-listings.R:8:3'): Column labels are the same ───────────────────
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-listings.R:8:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:36:3'): listings work well with different formats and attributes ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-listings.R:36:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:106:3'): Content of listings supports newlines ──────
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(mylst) at test-listings.R:106:3
2. └─rlistings::matrix_form(mylst)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:142:3'): column inclusion and ordering stuff ────────
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(head(lsting)) at test-listings.R:142:3
2. └─rlistings::matrix_form(head(lsting))
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:225:3'): unique_rows removes duplicate rows from listing ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-listings.R:225:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:259:3'): as_listing custom format works in key cols ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_identical(...) at test-listings.R:259:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─formatters::matrix_form(lsting)
5. └─rlistings::matrix_form(lsting)
6. └─rlistings (local) .local(...)
7. └─base::vapply(...)
8. └─formatters (local) FUN(X[[i]], ...)
9. └─base::match.arg(round_type)
── Error ('test-listings.R:273:3'): as_listing works with NA values in key cols ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_identical(...) at test-listings.R:273:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─formatters::matrix_form(lsting)
5. └─rlistings::matrix_form(lsting)
6. └─rlistings (local) .local(...)
7. └─base::vapply(...)
8. └─formatters (local) FUN(X[[i]], ...)
9. └─base::match.arg(round_type)
── Error ('test-listings.R:383:3'): add_listing_col works with a function when a format is applied ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_identical(...) at test-listings.R:383:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─formatters::matrix_form(lsting)
5. └─rlistings::matrix_form(lsting)
6. └─rlistings (local) .local(...)
7. └─base::vapply(...)
8. └─formatters (local) FUN(X[[i]], ...)
9. └─base::match.arg(round_type)
── Error ('test-matrix_form.R:13:3'): matrix_form keeps relevant information and structure about the listing ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-matrix_form.R:13:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-matrix_form.R:53:3'): matrix_form detects { or } in labels and sends meaningful error message ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_error(matrix_form(lsting), "Labels cannot contain") at test-matrix_form.R:53:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─formatters::matrix_form(lsting)
8. └─rlistings::matrix_form(lsting)
9. └─rlistings (local) .local(...)
10. └─base::vapply(...)
11. └─formatters (local) FUN(X[[i]], ...)
12. └─base::match.arg(round_type)
── Error ('test-matrix_form.R:85:3'): align_colnames can change alignment for column titles ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-matrix_form.R:85:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-paginate_listing.R:16:3'): pagination works vertically ─────────
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─base::suppressMessages(...) at test-paginate_listing.R:16:3
2. │ └─base::withCallingHandlers(...)
3. └─rlistings::paginate_listing(...)
4. └─formatters::paginate_to_mpfs(...)
5. ├─formatters::matrix_form(...)
6. ├─rlistings::matrix_form(...)
7. │ └─rlistings (local) .local(...)
8. │ └─base::vapply(...)
9. │ └─formatters (local) FUN(X[[i]], ...)
10. │ └─base::match.arg(round_type)
11. ├─formatters::obj_round_type(obj)
12. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:44:3'): horizontal pagination with 0 or 1 key column specified works correctly ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, cpp = 70, print_pages = FALSE) at test-paginate_listing.R:44:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:107:3'): listing works with no vertical pagination ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = NULL, print_pages = FALSE) at test-paginate_listing.R:107:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:131:3'): checking vertical pagination line calculation. ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 8, print_pages = FALSE) at test-paginate_listing.R:131:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:144:3'): pagination: lpp and cpp correctly computed for pg_width and pg_height ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 24, cpp = 135, print_pages = FALSE) at test-paginate_listing.R:144:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:151:3'): pagination: lpp and cpp correctly computed for page_type and font_size ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 69, cpp = 73, print_pages = FALSE) at test-paginate_listing.R:151:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:162:3'): pagination: lpp and cpp correctly computed for lineheight ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:162:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:169:3'): pagination: lpp and cpp correctly computed for landscape ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:169:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:176:3'): pagination: lpp and cpp correctly computed for margins ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:176:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:187:3'): pagination works with col wrapping ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─testthat::expect_silent(...) at test-paginate_listing.R:187:3
2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
3. │ ├─testthat (local) .capture(...)
4. │ │ ├─withr::with_output_sink(...)
5. │ │ │ └─base::force(code)
6. │ │ ├─base::withCallingHandlers(...)
7. │ │ └─base::withVisible(code)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─rlistings::paginate_listing(...)
10. └─formatters::paginate_to_mpfs(...)
11. ├─formatters::matrix_form(...)
12. ├─rlistings::matrix_form(...)
13. │ └─rlistings (local) .local(...)
14. │ └─base::vapply(...)
15. │ └─formatters (local) FUN(X[[i]], ...)
16. │ └─base::match.arg(round_type)
17. ├─formatters::obj_round_type(obj)
18. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:214:3'): pagination repeats keycols in other pages ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─testthat::expect_true(...) at test-paginate_listing.R:214:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─base::grepl(...)
5. │ └─base::is.factor(x)
6. └─formatters::paginate_to_mpfs(lsting, lpp = 33, cpp = 550)
7. ├─formatters::matrix_form(...)
8. ├─rlistings::matrix_form(...)
9. │ └─rlistings (local) .local(...)
10. │ └─base::vapply(...)
11. │ └─formatters (local) FUN(X[[i]], ...)
12. │ └─base::match.arg(round_type)
13. ├─formatters::obj_round_type(obj)
14. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:256:3'): pagination repeats keycols in other pages (longer test) ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─lsting %>% ... at test-paginate_listing.R:256:3
2. └─formatters::export_as_txt(., tf_wrap = TRUE, lpp = 30, page_break = "\f")
3. ├─formatters::paginate_to_mpfs(...)
4. │ ├─formatters::matrix_form(...)
5. │ └─rlistings::matrix_form(...)
6. │ └─rlistings (local) .local(...)
7. │ └─base::vapply(...)
8. │ └─formatters (local) FUN(X[[i]], ...)
9. │ └─base::match.arg(round_type)
10. ├─formatters::obj_round_type(x)
11. └─formatters::obj_round_type(x)
── Error ('test-paginate_listing.R:269:3'): paginate_to_mpfs works with wrapping on keycols ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::paginate_to_mpfs(...) at test-paginate_listing.R:269:3
2. ├─formatters::matrix_form(...)
3. ├─rlistings::matrix_form(...)
4. │ └─rlistings (local) .local(...)
5. │ └─base::vapply(...)
6. │ └─formatters (local) FUN(X[[i]], ...)
7. │ └─base::match.arg(round_type)
8. ├─formatters::obj_round_type(obj)
9. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:306:3'): paginate_to_mpfs works with wrapping on keycols when doing horizontal pagination ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::propose_column_widths(lst) at test-paginate_listing.R:306:3
2. ├─formatters::matrix_form(...)
3. ├─rlistings::matrix_form(...)
4. │ └─rlistings (local) .local(...)
5. │ └─base::vapply(...)
6. │ └─formatters (local) FUN(X[[i]], ...)
7. │ └─base::match.arg(round_type)
8. ├─formatters::obj_round_type(x)
9. └─formatters::obj_round_type(x)
── Error ('test-paginate_listing.R:347:3'): paginate_listing works with split_into_pages_by_var ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 20, cpp = 65, print_pages = FALSE) at test-paginate_listing.R:347:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─base::unlist(...)
4. │ └─base::lapply(...)
5. │ └─formatters (local) FUN(X[[i]], ...)
6. │ └─base::eval(cur_call, envir = parent.frame(3L))
7. │ └─base::eval(cur_call, envir = parent.frame(3L))
8. └─formatters::paginate_to_mpfs(...)
9. ├─formatters::matrix_form(...)
10. ├─rlistings::matrix_form(...)
11. │ └─rlistings (local) .local(...)
12. │ └─base::vapply(...)
13. │ └─formatters (local) FUN(X[[i]], ...)
14. │ └─base::match.arg(round_type)
15. ├─formatters::obj_round_type(obj)
16. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:401:3'): paginate_listing works with split_into_pages_by_var and trailing_sep ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_snapshot(lsting2) at test-paginate_listing.R:401:3
2. │ └─testthat:::expect_snapshot_(...)
3. │ ├─testthat:::with_is_snapshotting(...)
4. │ └─testthat:::verify_exec(quo_get_expr(x), quo_get_env(x), replay)
5. │ └─evaluate::evaluate(source, envir = env, new_device = FALSE, output_handler = handler)
6. │ ├─base::withRestarts(...)
7. │ │ └─base (local) withRestartList(expr, restarts)
8. │ │ ├─base (local) withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]])
9. │ │ │ └─base (local) doWithOneRestart(return(expr), restart)
10. │ │ └─base (local) withRestartList(expr, restarts[-nr])
11. │ │ └─base (local) withOneRestart(expr, restarts[[1L]])
12. │ │ └─base (local) doWithOneRestart(return(expr), restart)
13. │ ├─evaluate:::with_handlers(...)
14. │ │ ├─base::eval(call)
15. │ │ │ └─base::eval(call)
16. │ │ └─base::withCallingHandlers(...)
17. │ └─watcher$print_value(ev$value, ev$visible, envir)
18. │ ├─base::withVisible(handle_value(handler, value, visible, envir))
19. │ └─evaluate:::handle_value(handler, value, visible, envir)
20. │ ├─handler$value(value)
21. │ └─testthat:::testthat_print.default(value)
22. │ ├─base::print(x)
23. │ └─base::print.default(x)
24. ├─base (local) `<fn>`(x)
25. └─rlistings:::print.listing_df(x)
26. └─base::tryCatch(...)
27. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. └─value[[3L]](cond)
── Error ('test-print.R:5:3'): Listing print correctly ─────────────────────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:5:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:18:3'): Listing print correctly with different widths ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(...) at test-print.R:18:3
2. ├─base::toString(matrix_form(lsting), widths = c(7, 8, 9), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:37:3'): as_listing produces correct output when default_formatting is specified ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:37:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:77:3'): as_listing produces correct output when col_formatting is specified ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:77:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:140:3'): listings support newline characters ───────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:140:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:158:3'): listings supports wrapping ────────────────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(lsting, widths = cw), "\n") at test-print.R:158:3
2. ├─base::toString(lsting, widths = cw)
3. ├─rlistings::toString(lsting, widths = cw)
4. │ └─rlistings (local) .local(x, ...)
5. │ ├─base::toString(...)
6. │ ├─formatters::matrix_form(...)
7. │ └─rlistings::matrix_form(...)
8. │ └─rlistings (local) .local(...)
9. │ └─base::vapply(...)
10. │ └─formatters (local) FUN(X[[i]], ...)
11. │ └─base::match.arg(round_type)
12. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
13. └─base::.handleSimpleError(...)
14. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:172:3'): sas rounding support ──────────────────────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(lsting) at test-print.R:172:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-print.R:196:3'): listings supports horizontal separators ───────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-print.R:196:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─base::sapply(...)
5. │ └─base::lapply(X = X, FUN = FUN, ...)
6. ├─base::strsplit(toString(result), "\n")
7. ├─base::toString(result)
8. ├─rlistings::toString(result)
9. │ └─rlistings (local) .local(x, ...)
10. │ ├─base::toString(...)
11. │ ├─formatters::matrix_form(...)
12. │ └─rlistings::matrix_form(...)
13. │ └─rlistings (local) .local(...)
14. │ └─base::vapply(...)
15. │ └─formatters (local) FUN(X[[i]], ...)
16. │ └─base::match.arg(round_type)
17. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
18. └─base::.handleSimpleError(...)
19. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:280:3'): spanning column label machinery works ─────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─utils::capture.output(print(lsting)) at test-print.R:280:3
2. │ └─base::withVisible(...elt(i))
3. ├─base::print(lsting)
4. └─rlistings:::print.listing_df(lsting)
5. └─base::tryCatch(...)
6. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
7. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
8. └─value[[3L]](cond)
[ FAIL 44 | WARN 0 | SKIP 0 | PASS 24 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.2.12
Check: re-building of vignette outputs
Result: ERROR
Error(s) in re-building vignettes:
--- re-building ‘col_formatting.Rmd’ using rmarkdown
Quitting from col_formatting.Rmd:76-84 [unnamed-chunk-4]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `h()`:
! error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
---
Backtrace:
▆
1. └─tools:::.buildOneVignette(...)
2. ├─base::tryCatch(...)
3. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
4. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
5. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
6. └─engine$weave(file, quiet = quiet, encoding = enc)
7. └─knitr:::vweave_rmarkdown(...)
8. └─rmarkdown::render(...)
9. └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
10. └─knitr:::process_file(text, output)
11. ├─xfun:::handle_error(...)
12. ├─base::withCallingHandlers(...)
13. └─knitr:::process_group(group)
14. └─knitr:::call_block(x)
15. └─knitr:::block_exec(params)
16. └─knitr:::eng_r(options)
17. ├─knitr:::in_input_dir(...)
18. │ └─knitr:::in_dir(input_dir(), expr)
19. └─knitr (local) evaluate(...)
20. └─evaluate::evaluate(...)
21. ├─base::withRestarts(...)
22. │ └─base (local) withRestartList(expr, restarts)
23. │ ├─base (local) withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]])
24. │ │ └─base (local) doWithOneRestart(return(expr), restart)
25. │ └─base (local) withRestartList(expr, restarts[-nr])
26. │ └─base (local) withOneRestart(expr, restarts[[1L]])
27. │ └─base (local) doWithOneRestart(return(expr), restart)
28. ├─evaluate:::with_handlers(...)
29. │ ├─base::eval(call)
30. │ │ └─base::eval(call)
31. │ └─base::withCallingHandlers(...)
32. └─watcher$print_value(ev$value, ev$visible, envir)
33. ├─base::withVisible(handle_value(handler, value, visible, envir))
34. └─evaluate:::handle_value(handler, value, visible, envir)
35. └─handler$value(value, visible)
36. └─knitr (local) fun(x, options = options)
37. ├─base::withVisible(knit_print(x, ...))
38. ├─knitr::knit_print(x, ...)
39. └─rmarkdown:::knit_print.data.frame(x, ...)
40. ├─context$df_print(x)
41. └─rlistings:::print.listing_df(x)
42. └─base::tryCatch(...)
43. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
44. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
45. └─value[[3L]](cond)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'col_formatting.Rmd' failed with diagnostics:
error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
--- failed re-building ‘col_formatting.Rmd’
--- re-building ‘large_list.Rmd’ using rmarkdown
[WARNING] Deprecated: --highlight-style. Use --syntax-highlighting instead.
--- finished re-building ‘large_list.Rmd’
--- re-building ‘pagination.Rmd’ using rmarkdown
Quitting from pagination.Rmd:64-74 [unnamed-chunk-5]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `h()`:
! error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
---
Backtrace:
▆
1. └─tools:::.buildOneVignette(...)
2. ├─base::tryCatch(...)
3. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
4. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
5. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
6. └─engine$weave(file, quiet = quiet, encoding = enc)
7. └─knitr:::vweave_rmarkdown(...)
8. └─rmarkdown::render(...)
9. └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
10. └─knitr:::process_file(text, output)
11. ├─xfun:::handle_error(...)
12. ├─base::withCallingHandlers(...)
13. └─knitr:::process_group(group)
14. └─knitr:::call_block(x)
15. └─knitr:::block_exec(params)
16. └─knitr:::eng_r(options)
17. ├─knitr:::in_input_dir(...)
18. │ └─knitr:::in_dir(input_dir(), expr)
19. └─knitr (local) evaluate(...)
20. └─evaluate::evaluate(...)
21. ├─base::withRestarts(...)
22. │ └─base (local) withRestartList(expr, restarts)
23. │ ├─base (local) withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]])
24. │ │ └─base (local) doWithOneRestart(return(expr), restart)
25. │ └─base (local) withRestartList(expr, restarts[-nr])
26. │ └─base (local) withOneRestart(expr, restarts[[1L]])
27. │ └─base (local) doWithOneRestart(return(expr), restart)
28. ├─evaluate:::with_handlers(...)
29. │ ├─base::eval(call)
30. │ │ └─base::eval(call)
31. │ └─base::withCallingHandlers(...)
32. └─watcher$print_value(ev$value, ev$visible, envir)
33. ├─base::withVisible(handle_value(handler, value, visible, envir))
34. └─evaluate:::handle_value(handler, value, visible, envir)
35. └─handler$value(value, visible)
36. └─knitr (local) fun(x, options = options)
37. ├─base::withVisible(knit_print(x, ...))
38. ├─knitr::knit_print(x, ...)
39. └─rmarkdown:::knit_print.data.frame(x, ...)
40. ├─context$df_print(x)
41. └─rlistings:::print.listing_df(x)
42. └─base::tryCatch(...)
43. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
44. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
45. └─value[[3L]](cond)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'pagination.Rmd' failed with diagnostics:
error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
--- failed re-building ‘pagination.Rmd’
--- re-building ‘ref_footnotes.Rmd’ using rmarkdown
Quitting from ref_footnotes.Rmd:57-65 [unnamed-chunk-4]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `h()`:
! error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
---
Backtrace:
▆
1. └─tools:::.buildOneVignette(...)
2. ├─base::tryCatch(...)
3. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
4. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
5. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
6. └─engine$weave(file, quiet = quiet, encoding = enc)
7. └─knitr:::vweave_rmarkdown(...)
8. └─rmarkdown::render(...)
9. └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
10. └─knitr:::process_file(text, output)
11. ├─xfun:::handle_error(...)
12. ├─base::withCallingHandlers(...)
13. └─knitr:::process_group(group)
14. └─knitr:::call_block(x)
15. └─knitr:::block_exec(params)
16. └─knitr:::eng_r(options)
17. ├─knitr:::in_input_dir(...)
18. │ └─knitr:::in_dir(input_dir(), expr)
19. └─knitr (local) evaluate(...)
20. └─evaluate::evaluate(...)
21. ├─base::withRestarts(...)
22. │ └─base (local) withRestartList(expr, restarts)
23. │ ├─base (local) withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]])
24. │ │ └─base (local) doWithOneRestart(return(expr), restart)
25. │ └─base (local) withRestartList(expr, restarts[-nr])
26. │ └─base (local) withOneRestart(expr, restarts[[1L]])
27. │ └─base (local) doWithOneRestart(return(expr), restart)
28. ├─evaluate:::with_handlers(...)
29. │ ├─base::eval(call)
30. │ │ └─base::eval(call)
31. │ └─base::withCallingHandlers(...)
32. └─watcher$print_value(ev$value, ev$visible, envir)
33. ├─base::withVisible(handle_value(handler, value, visible, envir))
34. └─evaluate:::handle_value(handler, value, visible, envir)
35. └─handler$value(value, visible)
36. └─knitr (local) fun(x, options = options)
37. ├─base::withVisible(knit_print(x, ...))
38. ├─knitr::knit_print(x, ...)
39. └─rmarkdown:::knit_print.data.frame(x, ...)
40. ├─context$df_print(x)
41. └─rlistings:::print.listing_df(x)
42. └─base::tryCatch(...)
43. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
44. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
45. └─value[[3L]](cond)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'ref_footnotes.Rmd' failed with diagnostics:
error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
--- failed re-building ‘ref_footnotes.Rmd’
--- re-building ‘rlistings.Rmd’ using rmarkdown
Quitting from rlistings.Rmd:91-98 [unnamed-chunk-4]
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
<error/rlang_error>
Error in `h()`:
! error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
---
Backtrace:
▆
1. └─tools:::.buildOneVignette(...)
2. ├─base::tryCatch(...)
3. │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
4. │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
5. │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
6. └─engine$weave(file, quiet = quiet, encoding = enc)
7. └─knitr:::vweave_rmarkdown(...)
8. └─rmarkdown::render(...)
9. └─knitr::knit(knit_input, knit_output, envir = envir, quiet = quiet)
10. └─knitr:::process_file(text, output)
11. ├─xfun:::handle_error(...)
12. ├─base::withCallingHandlers(...)
13. └─knitr:::process_group(group)
14. └─knitr:::call_block(x)
15. └─knitr:::block_exec(params)
16. └─knitr:::eng_r(options)
17. ├─knitr:::in_input_dir(...)
18. │ └─knitr:::in_dir(input_dir(), expr)
19. └─knitr (local) evaluate(...)
20. └─evaluate::evaluate(...)
21. ├─base::withRestarts(...)
22. │ └─base (local) withRestartList(expr, restarts)
23. │ ├─base (local) withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]])
24. │ │ └─base (local) doWithOneRestart(return(expr), restart)
25. │ └─base (local) withRestartList(expr, restarts[-nr])
26. │ └─base (local) withOneRestart(expr, restarts[[1L]])
27. │ └─base (local) doWithOneRestart(return(expr), restart)
28. ├─evaluate:::with_handlers(...)
29. │ ├─base::eval(call)
30. │ │ └─base::eval(call)
31. │ └─base::withCallingHandlers(...)
32. └─watcher$print_value(ev$value, ev$visible, envir)
33. ├─base::withVisible(handle_value(handler, value, visible, envir))
34. └─evaluate:::handle_value(handler, value, visible, envir)
35. └─handler$value(value, visible)
36. └─knitr (local) fun(x, options = options)
37. ├─base::withVisible(knit_print(x, ...))
38. ├─knitr::knit_print(x, ...)
39. └─rmarkdown:::knit_print.data.frame(x, ...)
40. ├─context$df_print(x)
41. └─rlistings:::print.listing_df(x)
42. └─base::tryCatch(...)
43. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
44. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
45. └─value[[3L]](cond)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Error: processing vignette 'rlistings.Rmd' failed with diagnostics:
error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
--- failed re-building ‘rlistings.Rmd’
SUMMARY: processing the following files failed:
‘col_formatting.Rmd’ ‘pagination.Rmd’ ‘ref_footnotes.Rmd’
‘rlistings.Rmd’
Error: Vignette re-building failed.
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.2.12
Check: tests
Result: ERROR
Running ‘testthat.R’ [11s/26s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(rlistings)
Loading required package: formatters
Attaching package: 'formatters'
The following object is masked from 'package:base':
%||%
Loading required package: tibble
> library(testthat)
>
> testthat::test_check("rlistings", reporter = "check")
Attaching package: 'dplyr'
The following objects are masked from 'package:stats':
filter, lag
The following objects are masked from 'package:base':
intersect, setdiff, setequal, union
Saving _problems/test-export-24.R
Saving _problems/test-export-40.R
Saving _problems/test-export-48.R
Saving _problems/test-export-68.R
Saving _problems/test-export-91.R
Saving _problems/test-export-101.R
Saving _problems/test-export-113.R
Saving _problems/test-listings-8.R
Saving _problems/test-listings-36.R
Saving _problems/test-listings-106.R
Saving _problems/test-listings-142.R
Saving _problems/test-listings-225.R
Saving _problems/test-listings-259.R
Saving _problems/test-listings-281.R
Saving _problems/test-listings-386.R
Saving _problems/test-matrix_form-13.R
Saving _problems/test-matrix_form-56.R
Saving _problems/test-matrix_form-85.R
Saving _problems/test-paginate_listing-16.R
Saving _problems/test-paginate_listing-44.R
Saving _problems/test-paginate_listing-107.R
Saving _problems/test-paginate_listing-131.R
Saving _problems/test-paginate_listing-144.R
Saving _problems/test-paginate_listing-151.R
Saving _problems/test-paginate_listing-162.R
Saving _problems/test-paginate_listing-169.R
Saving _problems/test-paginate_listing-176.R
Saving _problems/test-paginate_listing-217.R
Saving _problems/test-paginate_listing-256.R
Saving _problems/test-paginate_listing-269.R
Saving _problems/test-paginate_listing-306.R
Saving _problems/test-paginate_listing-347.R
Saving _problems/test-paginate_listing-401.R
Saving _problems/test-print-5.R
Saving _problems/test-print-18.R
Saving _problems/test-print-37.R
Saving _problems/test-print-77.R
Saving _problems/test-print-140.R
Saving _problems/test-print-158.R
Saving _problems/test-print-172.R
Saving _problems/test-print-207.R
[ FAIL 44 | WARN 0 | SKIP 0 | PASS 24 ]
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-export.R:6:5'): Listing print correctly ────────────────────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─testthat::expect_silent(...) at test-export.R:5:3
2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
3. │ ├─testthat (local) .capture(...)
4. │ │ ├─withr::with_output_sink(...)
5. │ │ │ └─base::force(code)
6. │ │ ├─base::withCallingHandlers(...)
7. │ │ └─base::withVisible(code)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─formatters::export_as_txt(lsting, file = NULL) at test-export.R:6:5
10. ├─formatters::paginate_to_mpfs(...)
11. │ ├─formatters::matrix_form(...)
12. │ └─rlistings::matrix_form(...)
13. │ └─rlistings (local) .local(...)
14. │ └─base::vapply(...)
15. │ └─formatters (local) FUN(X[[i]], ...)
16. │ └─base::match.arg(round_type)
17. ├─formatters::obj_round_type(x)
18. └─formatters::obj_round_type(x)
── Error ('test-export.R:24:3'): key columns repeat with export_as_txt ─────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─base::suppressMessages(...) at test-export.R:24:3
2. │ └─base::withCallingHandlers(...)
3. └─formatters::export_as_txt(lsting, lpp = 4, verbose = TRUE, page_break = "\n")
4. ├─formatters::paginate_to_mpfs(...)
5. │ ├─formatters::matrix_form(...)
6. │ └─rlistings::matrix_form(...)
7. │ └─rlistings (local) .local(...)
8. │ └─base::vapply(...)
9. │ └─formatters (local) FUN(X[[i]], ...)
10. │ └─base::match.arg(round_type)
11. ├─formatters::obj_round_type(x)
12. └─formatters::obj_round_type(x)
── Error ('test-export.R:37:3'): key columns repeat with pagination with export_as_txt ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(...) at test-export.R:37:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-export.R:48:3'): Listing print correctly, with paginate ────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(...) at test-export.R:48:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-export.R:68:3'): export_as_txt works and repeats the correct lines in pagination ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 33, cpp = 550, print_pages = FALSE) at test-export.R:68:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-export.R:91:3'): export_as_txt works with split_into_pages_by_var ──
Error in `obj_round_type(obj[[1]])`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(...) at test-export.R:91:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─base::unlist(...)
4. │ └─base::lapply(...)
5. │ └─formatters (local) FUN(X[[i]], ...)
6. │ └─base::eval(cur_call, envir = parent.frame(3L))
7. │ └─base::eval(cur_call, envir = parent.frame(3L))
8. ├─formatters::paginate_to_mpfs(...)
9. │ ├─formatters::matrix_form(...)
10. │ └─rlistings::matrix_form(...)
11. │ └─rlistings (local) .local(...)
12. │ └─base::vapply(...)
13. │ └─formatters (local) FUN(X[[i]], ...)
14. │ └─base::match.arg(round_type)
15. ├─formatters::obj_round_type(x)
16. └─formatters::obj_round_type(x)
17. ├─formatters::obj_round_type(obj[[1]])
18. └─formatters::obj_round_type(obj[[1]])
── Error ('test-export.R:101:3'): export_as_txt works with empty listings ──────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(lsting) at test-export.R:101:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-export.R:113:3'): export_as_txt works with listings with all key cols ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(lsting) at test-export.R:113:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-listings.R:8:3'): Column labels are the same ───────────────────
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-listings.R:8:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:36:3'): listings work well with different formats and attributes ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-listings.R:36:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:106:3'): Content of listings supports newlines ──────
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(mylst) at test-listings.R:106:3
2. └─rlistings::matrix_form(mylst)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:142:3'): column inclusion and ordering stuff ────────
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(head(lsting)) at test-listings.R:142:3
2. └─rlistings::matrix_form(head(lsting))
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:225:3'): unique_rows removes duplicate rows from listing ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-listings.R:225:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-listings.R:259:3'): as_listing custom format works in key cols ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_identical(...) at test-listings.R:259:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─formatters::matrix_form(lsting)
5. └─rlistings::matrix_form(lsting)
6. └─rlistings (local) .local(...)
7. └─base::vapply(...)
8. └─formatters (local) FUN(X[[i]], ...)
9. └─base::match.arg(round_type)
── Error ('test-listings.R:273:3'): as_listing works with NA values in key cols ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_identical(...) at test-listings.R:273:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─formatters::matrix_form(lsting)
5. └─rlistings::matrix_form(lsting)
6. └─rlistings (local) .local(...)
7. └─base::vapply(...)
8. └─formatters (local) FUN(X[[i]], ...)
9. └─base::match.arg(round_type)
── Error ('test-listings.R:383:3'): add_listing_col works with a function when a format is applied ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_identical(...) at test-listings.R:383:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─formatters::matrix_form(lsting)
5. └─rlistings::matrix_form(lsting)
6. └─rlistings (local) .local(...)
7. └─base::vapply(...)
8. └─formatters (local) FUN(X[[i]], ...)
9. └─base::match.arg(round_type)
── Error ('test-matrix_form.R:13:3'): matrix_form keeps relevant information and structure about the listing ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-matrix_form.R:13:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-matrix_form.R:53:3'): matrix_form detects { or } in labels and sends meaningful error message ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_error(matrix_form(lsting), "Labels cannot contain") at test-matrix_form.R:53:3
2. │ └─testthat:::expect_condition_matching_(...)
3. │ └─testthat:::quasi_capture(...)
4. │ ├─testthat (local) .capture(...)
5. │ │ └─base::withCallingHandlers(...)
6. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
7. ├─formatters::matrix_form(lsting)
8. └─rlistings::matrix_form(lsting)
9. └─rlistings (local) .local(...)
10. └─base::vapply(...)
11. └─formatters (local) FUN(X[[i]], ...)
12. └─base::match.arg(round_type)
── Error ('test-matrix_form.R:85:3'): align_colnames can change alignment for column titles ──
Error in `match.arg(round_type)`: 'arg' must be of length 1
Backtrace:
▆
1. ├─formatters::matrix_form(lsting) at test-matrix_form.R:85:3
2. └─rlistings::matrix_form(lsting)
3. └─rlistings (local) .local(...)
4. └─base::vapply(...)
5. └─formatters (local) FUN(X[[i]], ...)
6. └─base::match.arg(round_type)
── Error ('test-paginate_listing.R:16:3'): pagination works vertically ─────────
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─base::suppressMessages(...) at test-paginate_listing.R:16:3
2. │ └─base::withCallingHandlers(...)
3. └─rlistings::paginate_listing(...)
4. └─formatters::paginate_to_mpfs(...)
5. ├─formatters::matrix_form(...)
6. ├─rlistings::matrix_form(...)
7. │ └─rlistings (local) .local(...)
8. │ └─base::vapply(...)
9. │ └─formatters (local) FUN(X[[i]], ...)
10. │ └─base::match.arg(round_type)
11. ├─formatters::obj_round_type(obj)
12. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:44:3'): horizontal pagination with 0 or 1 key column specified works correctly ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, cpp = 70, print_pages = FALSE) at test-paginate_listing.R:44:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:107:3'): listing works with no vertical pagination ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = NULL, print_pages = FALSE) at test-paginate_listing.R:107:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:131:3'): checking vertical pagination line calculation. ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 8, print_pages = FALSE) at test-paginate_listing.R:131:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:144:3'): pagination: lpp and cpp correctly computed for pg_width and pg_height ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 24, cpp = 135, print_pages = FALSE) at test-paginate_listing.R:144:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:151:3'): pagination: lpp and cpp correctly computed for page_type and font_size ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 69, cpp = 73, print_pages = FALSE) at test-paginate_listing.R:151:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:162:3'): pagination: lpp and cpp correctly computed for lineheight ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:162:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:169:3'): pagination: lpp and cpp correctly computed for landscape ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:169:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:176:3'): pagination: lpp and cpp correctly computed for margins ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(...) at test-paginate_listing.R:176:3
2. └─formatters::paginate_to_mpfs(...)
3. ├─formatters::matrix_form(...)
4. ├─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(obj)
10. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:187:3'): pagination works with col wrapping ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─testthat::expect_silent(...) at test-paginate_listing.R:187:3
2. │ └─testthat:::quasi_capture(enquo(object), NULL, evaluate_promise)
3. │ ├─testthat (local) .capture(...)
4. │ │ ├─withr::with_output_sink(...)
5. │ │ │ └─base::force(code)
6. │ │ ├─base::withCallingHandlers(...)
7. │ │ └─base::withVisible(code)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. └─rlistings::paginate_listing(...)
10. └─formatters::paginate_to_mpfs(...)
11. ├─formatters::matrix_form(...)
12. ├─rlistings::matrix_form(...)
13. │ └─rlistings (local) .local(...)
14. │ └─base::vapply(...)
15. │ └─formatters (local) FUN(X[[i]], ...)
16. │ └─base::match.arg(round_type)
17. ├─formatters::obj_round_type(obj)
18. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:214:3'): pagination repeats keycols in other pages ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─testthat::expect_true(...) at test-paginate_listing.R:214:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─base::grepl(...)
5. │ └─base::is.factor(x)
6. └─formatters::paginate_to_mpfs(lsting, lpp = 33, cpp = 550)
7. ├─formatters::matrix_form(...)
8. ├─rlistings::matrix_form(...)
9. │ └─rlistings (local) .local(...)
10. │ └─base::vapply(...)
11. │ └─formatters (local) FUN(X[[i]], ...)
12. │ └─base::match.arg(round_type)
13. ├─formatters::obj_round_type(obj)
14. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:256:3'): pagination repeats keycols in other pages (longer test) ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. ├─lsting %>% ... at test-paginate_listing.R:256:3
2. └─formatters::export_as_txt(., tf_wrap = TRUE, lpp = 30, page_break = "\f")
3. ├─formatters::paginate_to_mpfs(...)
4. │ ├─formatters::matrix_form(...)
5. │ └─rlistings::matrix_form(...)
6. │ └─rlistings (local) .local(...)
7. │ └─base::vapply(...)
8. │ └─formatters (local) FUN(X[[i]], ...)
9. │ └─base::match.arg(round_type)
10. ├─formatters::obj_round_type(x)
11. └─formatters::obj_round_type(x)
── Error ('test-paginate_listing.R:269:3'): paginate_to_mpfs works with wrapping on keycols ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::paginate_to_mpfs(...) at test-paginate_listing.R:269:3
2. ├─formatters::matrix_form(...)
3. ├─rlistings::matrix_form(...)
4. │ └─rlistings (local) .local(...)
5. │ └─base::vapply(...)
6. │ └─formatters (local) FUN(X[[i]], ...)
7. │ └─base::match.arg(round_type)
8. ├─formatters::obj_round_type(obj)
9. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:306:3'): paginate_to_mpfs works with wrapping on keycols when doing horizontal pagination ──
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::propose_column_widths(lst) at test-paginate_listing.R:306:3
2. ├─formatters::matrix_form(...)
3. ├─rlistings::matrix_form(...)
4. │ └─rlistings (local) .local(...)
5. │ └─base::vapply(...)
6. │ └─formatters (local) FUN(X[[i]], ...)
7. │ └─base::match.arg(round_type)
8. ├─formatters::obj_round_type(x)
9. └─formatters::obj_round_type(x)
── Error ('test-paginate_listing.R:347:3'): paginate_listing works with split_into_pages_by_var ──
Error in `obj_round_type(obj)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─rlistings::paginate_listing(lsting, lpp = 20, cpp = 65, print_pages = FALSE) at test-paginate_listing.R:347:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─base::unlist(...)
4. │ └─base::lapply(...)
5. │ └─formatters (local) FUN(X[[i]], ...)
6. │ └─base::eval(cur_call, envir = parent.frame(3L))
7. │ └─base::eval(cur_call, envir = parent.frame(3L))
8. └─formatters::paginate_to_mpfs(...)
9. ├─formatters::matrix_form(...)
10. ├─rlistings::matrix_form(...)
11. │ └─rlistings (local) .local(...)
12. │ └─base::vapply(...)
13. │ └─formatters (local) FUN(X[[i]], ...)
14. │ └─base::match.arg(round_type)
15. ├─formatters::obj_round_type(obj)
16. └─formatters::obj_round_type(obj)
── Error ('test-paginate_listing.R:401:3'): paginate_listing works with split_into_pages_by_var and trailing_sep ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_snapshot(lsting2) at test-paginate_listing.R:401:3
2. │ └─testthat:::expect_snapshot_(...)
3. │ ├─testthat:::with_is_snapshotting(...)
4. │ └─testthat:::verify_exec(quo_get_expr(x), quo_get_env(x), replay)
5. │ └─evaluate::evaluate(source, envir = env, new_device = FALSE, output_handler = handler)
6. │ ├─base::withRestarts(...)
7. │ │ └─base (local) withRestartList(expr, restarts)
8. │ │ ├─base (local) withOneRestart(withRestartList(expr, restarts[-nr]), restarts[[nr]])
9. │ │ │ └─base (local) doWithOneRestart(return(expr), restart)
10. │ │ └─base (local) withRestartList(expr, restarts[-nr])
11. │ │ └─base (local) withOneRestart(expr, restarts[[1L]])
12. │ │ └─base (local) doWithOneRestart(return(expr), restart)
13. │ ├─evaluate:::with_handlers(...)
14. │ │ ├─base::eval(call)
15. │ │ │ └─base::eval(call)
16. │ │ └─base::withCallingHandlers(...)
17. │ └─watcher$print_value(ev$value, ev$visible, envir)
18. │ ├─base::withVisible(handle_value(handler, value, visible, envir))
19. │ └─evaluate:::handle_value(handler, value, visible, envir)
20. │ ├─handler$value(value)
21. │ └─testthat:::testthat_print.default(value)
22. │ ├─base::print(x)
23. │ └─base::print.default(x)
24. ├─base (local) `<fn>`(x)
25. └─rlistings:::print.listing_df(x)
26. └─base::tryCatch(...)
27. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. └─value[[3L]](cond)
── Error ('test-print.R:5:3'): Listing print correctly ─────────────────────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:5:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:18:3'): Listing print correctly with different widths ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(...) at test-print.R:18:3
2. ├─base::toString(matrix_form(lsting), widths = c(7, 8, 9), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:37:3'): as_listing produces correct output when default_formatting is specified ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:37:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:77:3'): as_listing produces correct output when col_formatting is specified ──
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:77:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:140:3'): listings support newline characters ───────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(matrix_form(lsting), hsep = "-"), "\\n") at test-print.R:140:3
2. ├─base::toString(matrix_form(lsting), hsep = "-")
3. ├─formatters::matrix_form(lsting)
4. ├─rlistings::matrix_form(lsting)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
10. └─base::.handleSimpleError(...)
11. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:158:3'): listings supports wrapping ────────────────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─base::strsplit(toString(lsting, widths = cw), "\n") at test-print.R:158:3
2. ├─base::toString(lsting, widths = cw)
3. ├─rlistings::toString(lsting, widths = cw)
4. │ └─rlistings (local) .local(x, ...)
5. │ ├─base::toString(...)
6. │ ├─formatters::matrix_form(...)
7. │ └─rlistings::matrix_form(...)
8. │ └─rlistings (local) .local(...)
9. │ └─base::vapply(...)
10. │ └─formatters (local) FUN(X[[i]], ...)
11. │ └─base::match.arg(round_type)
12. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
13. └─base::.handleSimpleError(...)
14. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:172:3'): sas rounding support ──────────────────────────
Error in `obj_round_type(x)`: got a list that doesn't appear to contain (only) tables or listings
Backtrace:
▆
1. └─formatters::export_as_txt(lsting) at test-print.R:172:3
2. ├─formatters::paginate_to_mpfs(...)
3. │ ├─formatters::matrix_form(...)
4. │ └─rlistings::matrix_form(...)
5. │ └─rlistings (local) .local(...)
6. │ └─base::vapply(...)
7. │ └─formatters (local) FUN(X[[i]], ...)
8. │ └─base::match.arg(round_type)
9. ├─formatters::obj_round_type(x)
10. └─formatters::obj_round_type(x)
── Error ('test-print.R:196:3'): listings supports horizontal separators ───────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─testthat::expect_equal(...) at test-print.R:196:3
2. │ └─testthat::quasi_label(enquo(object), label)
3. │ └─rlang::eval_bare(expr, quo_get_env(quo))
4. ├─base::sapply(...)
5. │ └─base::lapply(X = X, FUN = FUN, ...)
6. ├─base::strsplit(toString(result), "\n")
7. ├─base::toString(result)
8. ├─rlistings::toString(result)
9. │ └─rlistings (local) .local(x, ...)
10. │ ├─base::toString(...)
11. │ ├─formatters::matrix_form(...)
12. │ └─rlistings::matrix_form(...)
13. │ └─rlistings (local) .local(...)
14. │ └─base::vapply(...)
15. │ └─formatters (local) FUN(X[[i]], ...)
16. │ └─base::match.arg(round_type)
17. │ └─base::stop(gettextf("'%s' must be of length 1", "arg"), domain = NA)
18. └─base::.handleSimpleError(...)
19. └─base (local) h(simpleError(msg, call))
── Error ('test-print.R:280:3'): spanning column label machinery works ─────────
Error in `h(simpleError(msg, call))`: error in evaluating the argument 'x' in selecting a method for function 'toString': 'arg' must be of length 1
Backtrace:
▆
1. ├─utils::capture.output(print(lsting)) at test-print.R:280:3
2. │ └─base::withVisible(...elt(i))
3. ├─base::print(lsting)
4. └─rlistings:::print.listing_df(lsting)
5. └─base::tryCatch(...)
6. └─base (local) tryCatchList(expr, classes, parentenv, handlers)
7. └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
8. └─value[[3L]](cond)
[ FAIL 44 | WARN 0 | SKIP 0 | PASS 24 ]
Error:
! Test failures.
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc