- using R version 4.4.3 (2025-02-28 ucrt)
- using platform: x86_64-w64-mingw32
- R was compiled by
gcc.exe (GCC) 13.3.0
GNU Fortran (GCC) 13.3.0
- running under: Windows Server 2022 x64 (build 20348)
- using session charset: UTF-8
- checking for file 'gtExtras/DESCRIPTION' ... OK
- checking extension type ... Package
- this is package 'gtExtras' version '0.6.0'
- package encoding: UTF-8
- checking package namespace information ... OK
- checking package dependencies ... OK
- checking if this is a source package ... OK
- checking if there is a namespace ... OK
- checking for hidden files and directories ... OK
- checking for portable file names ... OK
- checking whether package 'gtExtras' can be installed ... OK
See the install log for details.
- checking installed package size ... OK
- checking package directory ... OK
- checking DESCRIPTION meta-information ... OK
- checking top-level files ... OK
- checking for left-over files ... OK
- checking index information ... OK
- checking package subdirectories ... OK
- checking code files for non-ASCII characters ... OK
- checking R files for syntax errors ... OK
- checking whether the package can be loaded ... [2s] OK
- checking whether the package can be loaded with stated dependencies ... [2s] OK
- checking whether the package can be unloaded cleanly ... [2s] OK
- checking whether the namespace can be loaded with stated dependencies ... [2s] OK
- checking whether the namespace can be unloaded cleanly ... [2s] OK
- checking loading without being on the library search path ... [2s] OK
- checking whether startup messages can be suppressed ... [2s] OK
- checking use of S3 registration ... OK
- checking dependencies in R code ... OK
- checking S3 generic/method consistency ... OK
- checking replacement functions ... OK
- checking foreign function calls ... OK
- checking R code for possible problems ... [13s] OK
- checking Rd files ... [2s] OK
- checking Rd metadata ... OK
- checking Rd cross-references ... OK
- checking for missing documentation entries ... OK
- checking for code/documentation mismatches ... OK
- checking Rd \usage sections ... OK
- checking Rd contents ... OK
- checking for unstated dependencies in examples ... OK
- checking R/sysdata.rda ... OK
- checking examples ... [6s] OK
- checking for unstated dependencies in 'tests' ... OK
- checking tests ... [37s] ERROR
Running 'testthat.R' [37s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
> library(testthat)
> library(gtExtras)
Loading required package: gt
Attaching package: 'gt'
The following object is masked from 'package:testthat':
matches
Attaching package: 'gtExtras'
The following object is masked from 'package:testthat':
matches
>
> test_check("gtExtras")
Starting 2 test processes
[ FAIL 6 | WARN 9 | SKIP 19 | PASS 104 ]
══ Skipped tests (19) ══════════════════════════════════════════════════════════
• On CRAN (19): 'test-fmt_pad_num.R:3:3', 'test-fmt_pct_extra.R:3:3',
'test-fmt_symbol_first.R:56:3', 'test-fmt_symbol_first.R:61:3',
'test-fmt_symbol_first.R:66:3', 'test-fmt_symbol_first.R:71:3',
'test-fontawesome-icons.R:3:3', 'test-fontawesome-icons.R:101:3',
'test-gt_image_multi_rows.R:3:3', 'test-gt_image_rows.R:3:3',
'test-gt_img_circle.R:3:3', 'test-gt_summary_table.R:25:3',
'test-gt_text_img.R:3:3', 'test-gtsave_extra.R:4:3',
'test-html-helpers.R:24:3', 'test-icon_fun.R:3:3', 'test-img_header.R:3:3',
'test-two-column-layouts.R:4:3', 'test-two-column-layouts.R:27:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-gt_pct_bar.R:93:3'): gt_pct_bar SVG is created and has specific palette ──
round(bar_vals, 2) (`actual`) not equal to c(0, 119.06, 0, 124.02, 0, 85.04, 0, 85.04) (`expected`).
`actual`: 0 0 119.06 0 0 124.02 0 0 85.04 0 and 2 more...
`expected`: 0 119.06 0 124.02 0 85.04 ...
── Failure ('test-gt_pct_bar.R:97:3'): gt_pct_bar SVG is created and has specific palette ──
`bar_colors` (`actual`) not equal to c(...) (`expected`).
actual vs expected
- "fill: none; stroke-linecap: round; stroke-linejoin: round; stroke-miterlimit: 10.00; stroke-width: 0.00; stroke: none;"
"FF4343;"
"BFBFBF;"
- "fill: none; stroke-linecap: round; stroke-linejoin: round; stroke-miterlimit: 10.00; stroke-width: 0.00; stroke: none;"
"FF4343;"
"BFBFBF;"
- "fill: none; stroke-linecap: round; stroke-linejoin: round; stroke-miterlimit: 10.00; stroke-width: 0.00; stroke: none;"
"FF4343;"
"BFBFBF;"
- "fill: none; stroke-linecap: round; stroke-linejoin: round; stroke-miterlimit: 10.00; stroke-width: 0.00; stroke: none;"
and 2 more ...
── Failure ('test-gt_plt_bar.R:43:3'): gt_plt_bar svg is created and has specific values ──
`bar_vals` (`actual`) not equal to c("90.61", "90.61", "98.37", "92.33", "80.68", "78.10") (`expected`).
actual | expected
[1] "113.39" -
[2] "90.61" | "90.61" [1]
[3] "113.39" -
[4] "90.61" | "90.61" [2]
[5] "113.39" -
[6] "98.37" | "98.37" [3]
[7] "113.39" -
[8] "92.33" | "92.33" [4]
[9] "113.39" -
[10] "80.68" | "80.68" [5]
... ... ... and 2 more ...
── Failure ('test-gt_plt_bar.R:47:3'): gt_plt_bar svg is created and has specific values ──
`bar_neg_vals` (`actual`) not equal to c("49.19", "32.79", "16.40", "16.40", "32.79", "49.19") (`expected`).
actual | expected
[1] "113.39" -
[2] "49.19" | "49.19" [1]
[3] "113.39" -
[4] "32.79" | "32.79" [2]
[5] "113.39" -
[6] "16.40" | "16.40" [3]
[7] "113.39" -
[8] "16.40" | "16.40" [4]
[9] "113.39" -
[10] "32.79" | "32.79" [5]
... ... ... and 2 more ...
── Error ('test-gt_plt_conf_int.R:4:3'): gt_plt_conf_int generates correct points/text ──
Error in `geom_label(aes(x = .data$ci2, label = do.call(scales::label_number,
text_args)(.data$ci2)), color = pal_vals[4], hjust = 1.1,
size = text_size, vjust = 0, fill = "transparent", position = position_nudge(y = 0.25),
family = "mono", fontface = "bold", label.size = unit(0,
"lines"), label.padding = unit(0.05, "lines"), label.r = unit(0,
"lines"))`: Problem while converting geom to grob.
i Error occurred in the 3rd layer.
Caused by error in `Ops.unit()`:
! operator '==' not meaningful for units
Backtrace:
▆
1. ├─... %>% rvest::read_html() at test-gt_plt_conf_int.R:4:3
2. ├─rvest::read_html(.)
3. ├─gt::as_raw_html(.)
4. │ ├─htmltools::as.tags(data)
5. │ └─gt:::as.tags.gt_tbl(data)
6. │ ├─htmltools::HTML(render_as_html(data = x))
7. │ └─gt:::render_as_html(data = x)
8. │ └─gt:::build_data(data = data, context = "html")
9. │ └─gt:::perform_text_transforms(data = data)
10. │ ├─gt:::text_transform_at_location(...)
11. │ └─gt:::text_transform_at_location.cells_body(...)
12. │ └─gtExtras (local) fn(body[[col]][stub_df$rownum_i %in% loc$rows])
13. │ └─base::mapply(...)
14. │ └─gtExtras (local) `<fn>`(...)
15. │ └─ggplot2::ggsave(...)
16. │ └─base::lapply(plot, grid.draw)
17. │ ├─grid (local) FUN(X[[i]], ...)
18. │ └─ggplot2 (local) `grid.draw.ggplot2::ggplot`(X[[i]], ...)
19. │ ├─base::print(x)
20. │ └─ggplot2 (local) `print.ggplot2::ggplot`(x)
21. │ ├─ggplot2::ggplot_gtable(data)
22. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(data)
23. │ └─ggplot2:::by_layer(...)
24. │ ├─rlang::try_fetch(...)
25. │ │ ├─base::tryCatch(...)
26. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
27. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
28. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
29. │ │ └─base::withCallingHandlers(...)
30. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
31. │ └─l$draw_geom(d, layout)
32. │ └─ggplot2 (local) draw_geom(..., self = self)
33. │ └─self$geom$draw_layer(...)
34. │ └─ggplot2 (local) draw_layer(..., self = self)
35. │ └─base::lapply(...)
36. │ └─ggplot2 (local) FUN(X[[i]], ...)
37. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
38. │ └─self$draw_panel(...)
39. │ └─ggplot2 (local) draw_panel(..., self = self)
40. │ └─grid:::Ops.unit(data$linewidth, 0)
41. │ └─base::stop(...)
42. └─base::.handleSimpleError(...)
43. └─rlang (local) h(simpleError(msg, call))
44. └─handlers[[1L]](cnd)
45. └─cli::cli_abort(...)
46. └─rlang::abort(...)
── Error ('test-gt_plt_conf_int.R:62:3'): gt_plt_conf_int uses correct points/text/colors ──
Error in `geom_label(aes(x = .data$ci2, label = do.call(scales::label_number,
text_args)(.data$ci2)), color = pal_vals[4], hjust = 1.1,
size = text_size, vjust = 0, fill = "transparent", position = position_nudge(y = 0.25),
family = "mono", fontface = "bold", label.size = unit(0,
"lines"), label.padding = unit(0.05, "lines"), label.r = unit(0,
"lines"))`: Problem while converting geom to grob.
i Error occurred in the 3rd layer.
Caused by error in `Ops.unit()`:
! operator '==' not meaningful for units
Backtrace:
▆
1. ├─... %>% rvest::read_html() at test-gt_plt_conf_int.R:62:3
2. ├─rvest::read_html(.)
3. ├─gt::as_raw_html(.)
4. │ ├─htmltools::as.tags(data)
5. │ └─gt:::as.tags.gt_tbl(data)
6. │ ├─htmltools::HTML(render_as_html(data = x))
7. │ └─gt:::render_as_html(data = x)
8. │ └─gt:::build_data(data = data, context = "html")
9. │ └─gt:::perform_text_transforms(data = data)
10. │ ├─gt:::text_transform_at_location(...)
11. │ └─gt:::text_transform_at_location.cells_body(...)
12. │ └─gtExtras (local) fn(body[[col]][stub_df$rownum_i %in% loc$rows])
13. │ └─base::mapply(...)
14. │ └─gtExtras (local) `<fn>`(...)
15. │ └─ggplot2::ggsave(...)
16. │ └─base::lapply(plot, grid.draw)
17. │ ├─grid (local) FUN(X[[i]], ...)
18. │ └─ggplot2 (local) `grid.draw.ggplot2::ggplot`(X[[i]], ...)
19. │ ├─base::print(x)
20. │ └─ggplot2 (local) `print.ggplot2::ggplot`(x)
21. │ ├─ggplot2::ggplot_gtable(data)
22. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(data)
23. │ └─ggplot2:::by_layer(...)
24. │ ├─rlang::try_fetch(...)
25. │ │ ├─base::tryCatch(...)
26. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
27. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
28. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
29. │ │ └─base::withCallingHandlers(...)
30. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
31. │ └─l$draw_geom(d, layout)
32. │ └─ggplot2 (local) draw_geom(..., self = self)
33. │ └─self$geom$draw_layer(...)
34. │ └─ggplot2 (local) draw_layer(..., self = self)
35. │ └─base::lapply(...)
36. │ └─ggplot2 (local) FUN(X[[i]], ...)
37. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
38. │ └─self$draw_panel(...)
39. │ └─ggplot2 (local) draw_panel(..., self = self)
40. │ └─grid:::Ops.unit(data$linewidth, 0)
41. │ └─base::stop(...)
42. └─base::.handleSimpleError(...)
43. └─rlang (local) h(simpleError(msg, call))
44. └─handlers[[1L]](cnd)
45. └─cli::cli_abort(...)
46. └─rlang::abort(...)
[ FAIL 6 | WARN 9 | SKIP 19 | PASS 104 ]
Error: Test failures
Execution halted
- checking PDF version of manual ... [23s] OK
- checking HTML version of manual ... [15s] OK
- DONE
Status: 1 ERROR