Last updated on 2025-09-11 21:50:51 CEST.
| Flavor | Version | Tinstall | Tcheck | Ttotal | Status | Flags |
|---|---|---|---|---|---|---|
| r-devel-linux-x86_64-debian-clang | 0.1.0 | 5.29 | 75.61 | 80.90 | OK | |
| r-devel-linux-x86_64-debian-gcc | 0.1.0 | 3.63 | 55.04 | 58.67 | ERROR | |
| r-devel-linux-x86_64-fedora-clang | 0.1.0 | 120.00 | ERROR | |||
| r-devel-linux-x86_64-fedora-gcc | 0.1.0 | 112.51 | ERROR | |||
| r-devel-windows-x86_64 | 0.1.0 | 9.00 | 79.00 | 88.00 | OK | |
| r-patched-linux-x86_64 | 0.1.0 | 4.91 | 69.39 | 74.30 | OK | |
| r-release-linux-x86_64 | 0.1.0 | 4.91 | 69.51 | 74.42 | OK | |
| r-release-macos-arm64 | 0.1.0 | 44.00 | OK | |||
| r-release-macos-x86_64 | 0.1.0 | 74.00 | OK | |||
| r-release-windows-x86_64 | 0.1.0 | 8.00 | 80.00 | 88.00 | OK | |
| r-oldrel-macos-arm64 | 0.1.0 | 37.00 | OK | |||
| r-oldrel-macos-x86_64 | 0.1.0 | 71.00 | OK | |||
| r-oldrel-windows-x86_64 | 0.1.0 | 10.00 | 101.00 | 111.00 | OK |
Version: 0.1.0
Check: examples
Result: ERROR
Running examples in ‘gg1d-Ex.R’ failed
The error most likely occurred in:
> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: gg1d
> ### Title: AutoPlot an entire data.frame
> ### Aliases: gg1d
>
> ### ** Examples
>
> path_gg1d <- system.file("example.csv", package = "gg1d")
> df <- read.csv(path_gg1d, header = TRUE, na.strings = "")
>
> # Create Basic Plot
> gg1d(df, col_id = "ID", col_sort = "Glasses")
── Running gg1d ────────────────────────────────────────────────────────────────
── Sorting
• Sorting X axis by: Glasses
• Order type: frequency
• Sort order: descending
! Categorical columns must have <= 6 unique values to be visualised. Columns with too many unique values: Date (19)
── Generating Plot
ℹ Found 7 plottable columns in data
✔ Plotting column Glasses
✔ Plotting column Age
✔ Plotting column Gender
✔ Plotting column EyeColour
✔ Plotting column Height
✔ Plotting column HairColour
✔ Plotting column WearingHat
! Skipping column WearingHat_tooltip
! Skipping column Date
ℹ Stacking plots vertically
ℹ Making plot interactive since `interactive = TRUE`
Error:
! Problem while converting geom to grob.
ℹ Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─gg1d::gg1d(df, col_id = "ID", col_sort = "Glasses")
2. │ └─ggiraph::girafe(...)
3. │ ├─base::tryCatch(...)
4. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
5. │ ├─base::print(ggobj)
6. │ └─patchwork:::print.patchwork(ggobj)
7. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
8. │ └─base::lapply(x$plots, plot_table, guides = guides)
9. │ ├─patchwork (local) FUN(X[[i]], ...)
10. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
11. │ ├─patchwork:::plot_table(x, guides)
12. │ └─patchwork:::plot_table.ggplot(x, guides)
13. │ └─ggplot2::ggplotGrob(x)
14. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
15. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
16. │ └─ggplot2:::by_layer(...)
17. │ ├─rlang::try_fetch(...)
18. │ │ ├─base::tryCatch(...)
19. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
20. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
21. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
22. │ │ └─base::withCallingHandlers(...)
23. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
24. │ └─l$draw_geom(d, layout)
25. │ └─ggplot2 (local) draw_geom(..., self = self)
26. │ └─self$geom$draw_layer(...)
27. │ └─ggplot2 (local) draw_layer(..., self = self)
28. │ └─base::lapply(...)
29. │ └─ggplot2 (local) FUN(X[[i]], ...)
30. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
31. │ └─self$draw_panel(...)
32. └─base::.handleSimpleError(...)
33. └─rlang (local) h(simpleError(msg, call))
34. └─handlers[[1L]](cnd)
35. └─cli::cli_abort(...)
36. └─rlang::abort(...)
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.1.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [11s/16s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(gg1d)
>
> test_check("gg1d")
[ FAIL 9 | WARN 0 | SKIP 2 | PASS 47 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test-gg1d.R:169:3', 'test-gg1d.R:189:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-gg1d.R:14:3'): gg1d works as expected ────────────────────────
`suppressMessages(gg1d(mtcars))` threw an unexpected error.
Message: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Class: rlang_error/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(suppressMessages(gg1d(mtcars)), NA) at test-gg1d.R:14: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. ├─base::suppressMessages(gg1d(mtcars))
8. │ └─base::withCallingHandlers(...)
9. ├─gg1d::gg1d(mtcars)
10. │ └─ggiraph::girafe(...)
11. │ ├─base::tryCatch(...)
12. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
13. │ ├─base::print(ggobj)
14. │ └─patchwork:::print.patchwork(ggobj)
15. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
16. │ └─base::lapply(x$plots, plot_table, guides = guides)
17. │ ├─patchwork (local) FUN(X[[i]], ...)
18. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
19. │ ├─patchwork:::plot_table(x, guides)
20. │ └─patchwork:::plot_table.ggplot(x, guides)
21. │ └─ggplot2::ggplotGrob(x)
22. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
23. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
24. │ └─ggplot2:::by_layer(...)
25. │ ├─rlang::try_fetch(...)
26. │ │ ├─base::tryCatch(...)
27. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
30. │ │ └─base::withCallingHandlers(...)
31. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
32. │ └─l$draw_geom(d, layout)
33. │ └─ggplot2 (local) draw_geom(..., self = self)
34. │ └─self$geom$draw_layer(...)
35. │ └─ggplot2 (local) draw_layer(..., self = self)
36. │ └─base::lapply(...)
37. │ └─ggplot2 (local) FUN(X[[i]], ...)
38. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
39. │ └─self$draw_panel(...)
40. └─base::.handleSimpleError(...)
41. └─rlang (local) h(simpleError(msg, call))
42. └─handlers[[1L]](cnd)
43. └─cli::cli_abort(...)
44. └─rlang::abort(...)
── Error ('test-gg1d.R:50:3'): gg1d doesn't warn about columns the user isn't interested in [plain] ──
Error in `(function (mapping = NULL, data = NULL, stat = "identity", position = "stack",
..., just = 0.5, lineend = "butt", linejoin = "mitre", na.rm = FALSE,
show.legend = NA, inherit.aes = TRUE)
{
layer(mapping = mapping, data = data, geom = "col", stat = stat,
position = position, show.legend = show.legend, inherit.aes = inherit.aes,
params = list2(na.rm = na.rm, just = just, lineend = lineend,
linejoin = linejoin, ...))
})(mapping = structure(list(), class = c("ggplot2::mapping",
"uneval", "gg", "S7_object"), S7_class = structure(function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, name = "mapping", parent = structure(list(class = "gg", constructor = function (.data)
{
stop(sprintf("S3 class <%s> doesn't have a constructor",
class[[1]]), call. = FALSE)
}, validator = NULL), class = "S7_S3_class"), package = "ggplot2", properties = list(), abstract = FALSE, constructor = function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, class = c("S7_class", "S7_object")), names = character(0)),
width = 0.9, na.rm = TRUE)`: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─base::suppressMessages(...) at test-gg1d.R:50:3
2. │ └─base::withCallingHandlers(...)
3. ├─testthat::expect_message(gg1d(df, verbose = 2), "Columns with too many unique values: Letters")
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─gg1d::gg1d(df, verbose = 2)
10. │ └─ggiraph::girafe(...)
11. │ ├─base::tryCatch(...)
12. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
13. │ ├─base::print(ggobj)
14. │ └─patchwork:::print.patchwork(ggobj)
15. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
16. │ └─base::lapply(x$plots, plot_table, guides = guides)
17. │ ├─patchwork (local) FUN(X[[i]], ...)
18. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
19. │ ├─patchwork:::plot_table(x, guides)
20. │ └─patchwork:::plot_table.ggplot(x, guides)
21. │ └─ggplot2::ggplotGrob(x)
22. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
23. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
24. │ └─ggplot2:::by_layer(...)
25. │ ├─rlang::try_fetch(...)
26. │ │ ├─base::tryCatch(...)
27. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
30. │ │ └─base::withCallingHandlers(...)
31. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
32. │ └─l$draw_geom(d, layout)
33. │ └─ggplot2 (local) draw_geom(..., self = self)
34. │ └─self$geom$draw_layer(...)
35. │ └─ggplot2 (local) draw_layer(..., self = self)
36. │ └─base::lapply(...)
37. │ └─ggplot2 (local) FUN(X[[i]], ...)
38. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
39. │ └─self$draw_panel(...)
40. └─base::.handleSimpleError(...)
41. └─rlang (local) h(simpleError(msg, call))
42. └─handlers[[1L]](cnd)
43. └─cli::cli_abort(...)
44. └─rlang::abort(...)
── Failure ('test-gg1d.R:58:3'): gg1d returns a plot object ────────────────────
Expected `gg1d(data = mock_data, col_id = "ID", verbose = FALSE)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:59:3'): gg1d returns a plot object ────────────────────
`result` is not an S3 object
── Failure ('test-gg1d.R:63:3'): gg1d handles missing col_id gracefully ────────
Expected `gg1d(data = mock_data, verbose = FALSE)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:64:3'): gg1d handles missing col_id gracefully ────────
`result` is not an S3 object
── Error ('test-gg1d.R:149:3'): gg1d can handle interactive and static plot settings ──
Error in `(function (mapping = NULL, data = NULL, stat = "identity", position = "stack",
..., just = 0.5, lineend = "butt", linejoin = "mitre", na.rm = FALSE,
show.legend = NA, inherit.aes = TRUE)
{
layer(mapping = mapping, data = data, geom = "col", stat = stat,
position = position, show.legend = show.legend, inherit.aes = inherit.aes,
params = list2(na.rm = na.rm, just = just, lineend = lineend,
linejoin = linejoin, ...))
})(mapping = structure(list(), class = c("ggplot2::mapping",
"uneval", "gg", "S7_object"), S7_class = structure(function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, name = "mapping", parent = structure(list(class = "gg", constructor = function (.data)
{
stop(sprintf("S3 class <%s> doesn't have a constructor",
class[[1]]), call. = FALSE)
}, validator = NULL), class = "S7_S3_class"), package = "ggplot2", properties = list(), abstract = FALSE, constructor = function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, class = c("S7_class", "S7_object")), names = character(0)),
width = 0.9, na.rm = TRUE)`: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─gg1d::gg1d(data = mock_data, interactive = TRUE, verbose = FALSE) at test-gg1d.R:149:3
2. │ └─ggiraph::girafe(...)
3. │ ├─base::tryCatch(...)
4. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
5. │ ├─base::print(ggobj)
6. │ └─patchwork:::print.patchwork(ggobj)
7. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
8. │ └─base::lapply(x$plots, plot_table, guides = guides)
9. │ ├─patchwork (local) FUN(X[[i]], ...)
10. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
11. │ ├─patchwork:::plot_table(x, guides)
12. │ └─patchwork:::plot_table.ggplot(x, guides)
13. │ └─ggplot2::ggplotGrob(x)
14. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
15. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
16. │ └─ggplot2:::by_layer(...)
17. │ ├─rlang::try_fetch(...)
18. │ │ ├─base::tryCatch(...)
19. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
20. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
21. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
22. │ │ └─base::withCallingHandlers(...)
23. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
24. │ └─l$draw_geom(d, layout)
25. │ └─ggplot2 (local) draw_geom(..., self = self)
26. │ └─self$geom$draw_layer(...)
27. │ └─ggplot2 (local) draw_layer(..., self = self)
28. │ └─base::lapply(...)
29. │ └─ggplot2 (local) FUN(X[[i]], ...)
30. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
31. │ └─self$draw_panel(...)
32. └─base::.handleSimpleError(...)
33. └─rlang (local) h(simpleError(msg, call))
34. └─handlers[[1L]](cnd)
35. └─cli::cli_abort(...)
36. └─rlang::abort(...)
── Failure ('test-gg1d.R:165:3'): gg1d heirarchical sort works ─────────────────
Expected `gg1d(...)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:175:3'): gg1d heirarchical sort works ─────────────────
Expected `gg1d(...)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
[ FAIL 9 | WARN 0 | SKIP 2 | PASS 47 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.1.0
Check: examples
Result: ERROR
Running examples in ‘gg1d-Ex.R’ failed
The error most likely occurred in:
> ### Name: gg1d
> ### Title: AutoPlot an entire data.frame
> ### Aliases: gg1d
>
> ### ** Examples
>
> path_gg1d <- system.file("example.csv", package = "gg1d")
> df <- read.csv(path_gg1d, header = TRUE, na.strings = "")
>
> # Create Basic Plot
> gg1d(df, col_id = "ID", col_sort = "Glasses")
── Running gg1d ────────────────────────────────────────────────────────────────
── Sorting
• Sorting X axis by: Glasses
• Order type: frequency
• Sort order: descending
! Categorical columns must have <= 6 unique values to be visualised. Columns with too many unique values: Date (19)
── Generating Plot
ℹ Found 7 plottable columns in data
✔ Plotting column Glasses
✔ Plotting column Age
✔ Plotting column Gender
✔ Plotting column EyeColour
✔ Plotting column Height
✔ Plotting column HairColour
✔ Plotting column WearingHat
! Skipping column WearingHat_tooltip
! Skipping column Date
ℹ Stacking plots vertically
ℹ Making plot interactive since `interactive = TRUE`
Error:
! Problem while converting geom to grob.
ℹ Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─gg1d::gg1d(df, col_id = "ID", col_sort = "Glasses")
2. │ └─ggiraph::girafe(...)
3. │ ├─base::tryCatch(...)
4. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
5. │ ├─base::print(ggobj)
6. │ └─patchwork:::print.patchwork(ggobj)
7. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
8. │ └─base::lapply(x$plots, plot_table, guides = guides)
9. │ ├─patchwork (local) FUN(X[[i]], ...)
10. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
11. │ ├─patchwork:::plot_table(x, guides)
12. │ └─patchwork:::plot_table.ggplot(x, guides)
13. │ └─ggplot2::ggplotGrob(x)
14. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
15. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
16. │ └─ggplot2:::by_layer(...)
17. │ ├─rlang::try_fetch(...)
18. │ │ ├─base::tryCatch(...)
19. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
20. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
21. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
22. │ │ └─base::withCallingHandlers(...)
23. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
24. │ └─l$draw_geom(d, layout)
25. │ └─ggplot2 (local) draw_geom(..., self = self)
26. │ └─self$geom$draw_layer(...)
27. │ └─ggplot2 (local) draw_layer(..., self = self)
28. │ └─base::lapply(...)
29. │ └─ggplot2 (local) FUN(X[[i]], ...)
30. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
31. │ └─self$draw_panel(...)
32. └─base::.handleSimpleError(...)
33. └─rlang (local) h(simpleError(msg, call))
34. └─handlers[[1L]](cnd)
35. └─cli::cli_abort(...)
36. └─rlang::abort(...)
Execution halted
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.1.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [25s/29s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(gg1d)
>
> test_check("gg1d")
[ FAIL 9 | WARN 0 | SKIP 2 | PASS 47 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test-gg1d.R:169:3', 'test-gg1d.R:189:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-gg1d.R:14:3'): gg1d works as expected ────────────────────────
`suppressMessages(gg1d(mtcars))` threw an unexpected error.
Message: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Class: rlang_error/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(suppressMessages(gg1d(mtcars)), NA) at test-gg1d.R:14: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. ├─base::suppressMessages(gg1d(mtcars))
8. │ └─base::withCallingHandlers(...)
9. ├─gg1d::gg1d(mtcars)
10. │ └─ggiraph::girafe(...)
11. │ ├─base::tryCatch(...)
12. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
13. │ ├─base::print(ggobj)
14. │ └─patchwork:::print.patchwork(ggobj)
15. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
16. │ └─base::lapply(x$plots, plot_table, guides = guides)
17. │ ├─patchwork (local) FUN(X[[i]], ...)
18. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
19. │ ├─patchwork:::plot_table(x, guides)
20. │ └─patchwork:::plot_table.ggplot(x, guides)
21. │ └─ggplot2::ggplotGrob(x)
22. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
23. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
24. │ └─ggplot2:::by_layer(...)
25. │ ├─rlang::try_fetch(...)
26. │ │ ├─base::tryCatch(...)
27. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
30. │ │ └─base::withCallingHandlers(...)
31. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
32. │ └─l$draw_geom(d, layout)
33. │ └─ggplot2 (local) draw_geom(..., self = self)
34. │ └─self$geom$draw_layer(...)
35. │ └─ggplot2 (local) draw_layer(..., self = self)
36. │ └─base::lapply(...)
37. │ └─ggplot2 (local) FUN(X[[i]], ...)
38. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
39. │ └─self$draw_panel(...)
40. └─base::.handleSimpleError(...)
41. └─rlang (local) h(simpleError(msg, call))
42. └─handlers[[1L]](cnd)
43. └─cli::cli_abort(...)
44. └─rlang::abort(...)
── Error ('test-gg1d.R:50:3'): gg1d doesn't warn about columns the user isn't interested in [plain] ──
Error in `(function (mapping = NULL, data = NULL, stat = "identity", position = "stack",
..., just = 0.5, lineend = "butt", linejoin = "mitre", na.rm = FALSE,
show.legend = NA, inherit.aes = TRUE)
{
layer(mapping = mapping, data = data, geom = "col", stat = stat,
position = position, show.legend = show.legend, inherit.aes = inherit.aes,
params = list2(na.rm = na.rm, just = just, lineend = lineend,
linejoin = linejoin, ...))
})(mapping = structure(list(), class = c("ggplot2::mapping",
"uneval", "gg", "S7_object"), S7_class = structure(function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, name = "mapping", parent = structure(list(class = "gg", constructor = function (.data)
{
stop(sprintf("S3 class <%s> doesn't have a constructor",
class[[1]]), call. = FALSE)
}, validator = NULL), class = "S7_S3_class"), package = "ggplot2", properties = list(), abstract = FALSE, constructor = function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, class = c("S7_class", "S7_object")), names = character(0)),
width = 0.9, na.rm = TRUE)`: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─base::suppressMessages(...) at test-gg1d.R:50:3
2. │ └─base::withCallingHandlers(...)
3. ├─testthat::expect_message(gg1d(df, verbose = 2), "Columns with too many unique values: Letters")
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─gg1d::gg1d(df, verbose = 2)
10. │ └─ggiraph::girafe(...)
11. │ ├─base::tryCatch(...)
12. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
13. │ ├─base::print(ggobj)
14. │ └─patchwork:::print.patchwork(ggobj)
15. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
16. │ └─base::lapply(x$plots, plot_table, guides = guides)
17. │ ├─patchwork (local) FUN(X[[i]], ...)
18. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
19. │ ├─patchwork:::plot_table(x, guides)
20. │ └─patchwork:::plot_table.ggplot(x, guides)
21. │ └─ggplot2::ggplotGrob(x)
22. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
23. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
24. │ └─ggplot2:::by_layer(...)
25. │ ├─rlang::try_fetch(...)
26. │ │ ├─base::tryCatch(...)
27. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
30. │ │ └─base::withCallingHandlers(...)
31. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
32. │ └─l$draw_geom(d, layout)
33. │ └─ggplot2 (local) draw_geom(..., self = self)
34. │ └─self$geom$draw_layer(...)
35. │ └─ggplot2 (local) draw_layer(..., self = self)
36. │ └─base::lapply(...)
37. │ └─ggplot2 (local) FUN(X[[i]], ...)
38. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
39. │ └─self$draw_panel(...)
40. └─base::.handleSimpleError(...)
41. └─rlang (local) h(simpleError(msg, call))
42. └─handlers[[1L]](cnd)
43. └─cli::cli_abort(...)
44. └─rlang::abort(...)
── Failure ('test-gg1d.R:58:3'): gg1d returns a plot object ────────────────────
Expected `gg1d(data = mock_data, col_id = "ID", verbose = FALSE)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:59:3'): gg1d returns a plot object ────────────────────
`result` is not an S3 object
── Failure ('test-gg1d.R:63:3'): gg1d handles missing col_id gracefully ────────
Expected `gg1d(data = mock_data, verbose = FALSE)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:64:3'): gg1d handles missing col_id gracefully ────────
`result` is not an S3 object
── Error ('test-gg1d.R:149:3'): gg1d can handle interactive and static plot settings ──
Error in `(function (mapping = NULL, data = NULL, stat = "identity", position = "stack",
..., just = 0.5, lineend = "butt", linejoin = "mitre", na.rm = FALSE,
show.legend = NA, inherit.aes = TRUE)
{
layer(mapping = mapping, data = data, geom = "col", stat = stat,
position = position, show.legend = show.legend, inherit.aes = inherit.aes,
params = list2(na.rm = na.rm, just = just, lineend = lineend,
linejoin = linejoin, ...))
})(mapping = structure(list(), class = c("ggplot2::mapping",
"uneval", "gg", "S7_object"), S7_class = structure(function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, name = "mapping", parent = structure(list(class = "gg", constructor = function (.data)
{
stop(sprintf("S3 class <%s> doesn't have a constructor",
class[[1]]), call. = FALSE)
}, validator = NULL), class = "S7_S3_class"), package = "ggplot2", properties = list(), abstract = FALSE, constructor = function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, class = c("S7_class", "S7_object")), names = character(0)),
width = 0.9, na.rm = TRUE)`: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─gg1d::gg1d(data = mock_data, interactive = TRUE, verbose = FALSE) at test-gg1d.R:149:3
2. │ └─ggiraph::girafe(...)
3. │ ├─base::tryCatch(...)
4. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
5. │ ├─base::print(ggobj)
6. │ └─patchwork:::print.patchwork(ggobj)
7. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
8. │ └─base::lapply(x$plots, plot_table, guides = guides)
9. │ ├─patchwork (local) FUN(X[[i]], ...)
10. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
11. │ ├─patchwork:::plot_table(x, guides)
12. │ └─patchwork:::plot_table.ggplot(x, guides)
13. │ └─ggplot2::ggplotGrob(x)
14. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
15. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
16. │ └─ggplot2:::by_layer(...)
17. │ ├─rlang::try_fetch(...)
18. │ │ ├─base::tryCatch(...)
19. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
20. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
21. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
22. │ │ └─base::withCallingHandlers(...)
23. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
24. │ └─l$draw_geom(d, layout)
25. │ └─ggplot2 (local) draw_geom(..., self = self)
26. │ └─self$geom$draw_layer(...)
27. │ └─ggplot2 (local) draw_layer(..., self = self)
28. │ └─base::lapply(...)
29. │ └─ggplot2 (local) FUN(X[[i]], ...)
30. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
31. │ └─self$draw_panel(...)
32. └─base::.handleSimpleError(...)
33. └─rlang (local) h(simpleError(msg, call))
34. └─handlers[[1L]](cnd)
35. └─cli::cli_abort(...)
36. └─rlang::abort(...)
── Failure ('test-gg1d.R:165:3'): gg1d heirarchical sort works ─────────────────
Expected `gg1d(...)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:175:3'): gg1d heirarchical sort works ─────────────────
Expected `gg1d(...)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
[ FAIL 9 | WARN 0 | SKIP 2 | PASS 47 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.1.0
Check: tests
Result: ERROR
Running ‘testthat.R’ [24s/30s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> # This file is part of the standard setup for testthat.
> # It is recommended that you do not modify it.
> #
> # Where should you do additional test configuration?
> # Learn more about the roles of various files in:
> # * https://r-pkgs.org/tests.html
> # * https://testthat.r-lib.org/reference/test_package.html#special-files
>
> library(testthat)
> library(gg1d)
>
> test_check("gg1d")
[ FAIL 9 | WARN 0 | SKIP 2 | PASS 47 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test-gg1d.R:169:3', 'test-gg1d.R:189:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Failure ('test-gg1d.R:14:3'): gg1d works as expected ────────────────────────
`suppressMessages(gg1d(mtcars))` threw an unexpected error.
Message: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Class: rlang_error/error/condition
Backtrace:
▆
1. ├─testthat::expect_error(suppressMessages(gg1d(mtcars)), NA) at test-gg1d.R:14: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. ├─base::suppressMessages(gg1d(mtcars))
8. │ └─base::withCallingHandlers(...)
9. ├─gg1d::gg1d(mtcars)
10. │ └─ggiraph::girafe(...)
11. │ ├─base::tryCatch(...)
12. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
13. │ ├─base::print(ggobj)
14. │ └─patchwork:::print.patchwork(ggobj)
15. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
16. │ └─base::lapply(x$plots, plot_table, guides = guides)
17. │ ├─patchwork (local) FUN(X[[i]], ...)
18. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
19. │ ├─patchwork:::plot_table(x, guides)
20. │ └─patchwork:::plot_table.ggplot(x, guides)
21. │ └─ggplot2::ggplotGrob(x)
22. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
23. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
24. │ └─ggplot2:::by_layer(...)
25. │ ├─rlang::try_fetch(...)
26. │ │ ├─base::tryCatch(...)
27. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
30. │ │ └─base::withCallingHandlers(...)
31. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
32. │ └─l$draw_geom(d, layout)
33. │ └─ggplot2 (local) draw_geom(..., self = self)
34. │ └─self$geom$draw_layer(...)
35. │ └─ggplot2 (local) draw_layer(..., self = self)
36. │ └─base::lapply(...)
37. │ └─ggplot2 (local) FUN(X[[i]], ...)
38. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
39. │ └─self$draw_panel(...)
40. └─base::.handleSimpleError(...)
41. └─rlang (local) h(simpleError(msg, call))
42. └─handlers[[1L]](cnd)
43. └─cli::cli_abort(...)
44. └─rlang::abort(...)
── Error ('test-gg1d.R:50:3'): gg1d doesn't warn about columns the user isn't interested in [plain] ──
Error in `(function (mapping = NULL, data = NULL, stat = "identity", position = "stack",
..., just = 0.5, lineend = "butt", linejoin = "mitre", na.rm = FALSE,
show.legend = NA, inherit.aes = TRUE)
{
layer(mapping = mapping, data = data, geom = "col", stat = stat,
position = position, show.legend = show.legend, inherit.aes = inherit.aes,
params = list2(na.rm = na.rm, just = just, lineend = lineend,
linejoin = linejoin, ...))
})(mapping = structure(list(), class = c("ggplot2::mapping",
"uneval", "gg", "S7_object"), S7_class = structure(function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, name = "mapping", parent = structure(list(class = "gg", constructor = function (.data)
{
stop(sprintf("S3 class <%s> doesn't have a constructor",
class[[1]]), call. = FALSE)
}, validator = NULL), class = "S7_S3_class"), package = "ggplot2", properties = list(), abstract = FALSE, constructor = function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, class = c("S7_class", "S7_object")), names = character(0)),
width = 0.9, na.rm = TRUE)`: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─base::suppressMessages(...) at test-gg1d.R:50:3
2. │ └─base::withCallingHandlers(...)
3. ├─testthat::expect_message(gg1d(df, verbose = 2), "Columns with too many unique values: Letters")
4. │ └─testthat:::expect_condition_matching(...)
5. │ └─testthat:::quasi_capture(...)
6. │ ├─testthat (local) .capture(...)
7. │ │ └─base::withCallingHandlers(...)
8. │ └─rlang::eval_bare(quo_get_expr(.quo), quo_get_env(.quo))
9. ├─gg1d::gg1d(df, verbose = 2)
10. │ └─ggiraph::girafe(...)
11. │ ├─base::tryCatch(...)
12. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
13. │ ├─base::print(ggobj)
14. │ └─patchwork:::print.patchwork(ggobj)
15. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
16. │ └─base::lapply(x$plots, plot_table, guides = guides)
17. │ ├─patchwork (local) FUN(X[[i]], ...)
18. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
19. │ ├─patchwork:::plot_table(x, guides)
20. │ └─patchwork:::plot_table.ggplot(x, guides)
21. │ └─ggplot2::ggplotGrob(x)
22. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
23. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
24. │ └─ggplot2:::by_layer(...)
25. │ ├─rlang::try_fetch(...)
26. │ │ ├─base::tryCatch(...)
27. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
28. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
29. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
30. │ │ └─base::withCallingHandlers(...)
31. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
32. │ └─l$draw_geom(d, layout)
33. │ └─ggplot2 (local) draw_geom(..., self = self)
34. │ └─self$geom$draw_layer(...)
35. │ └─ggplot2 (local) draw_layer(..., self = self)
36. │ └─base::lapply(...)
37. │ └─ggplot2 (local) FUN(X[[i]], ...)
38. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
39. │ └─self$draw_panel(...)
40. └─base::.handleSimpleError(...)
41. └─rlang (local) h(simpleError(msg, call))
42. └─handlers[[1L]](cnd)
43. └─cli::cli_abort(...)
44. └─rlang::abort(...)
── Failure ('test-gg1d.R:58:3'): gg1d returns a plot object ────────────────────
Expected `gg1d(data = mock_data, col_id = "ID", verbose = FALSE)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:59:3'): gg1d returns a plot object ────────────────────
`result` is not an S3 object
── Failure ('test-gg1d.R:63:3'): gg1d handles missing col_id gracefully ────────
Expected `gg1d(data = mock_data, verbose = FALSE)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:64:3'): gg1d handles missing col_id gracefully ────────
`result` is not an S3 object
── Error ('test-gg1d.R:149:3'): gg1d can handle interactive and static plot settings ──
Error in `(function (mapping = NULL, data = NULL, stat = "identity", position = "stack",
..., just = 0.5, lineend = "butt", linejoin = "mitre", na.rm = FALSE,
show.legend = NA, inherit.aes = TRUE)
{
layer(mapping = mapping, data = data, geom = "col", stat = stat,
position = position, show.legend = show.legend, inherit.aes = inherit.aes,
params = list2(na.rm = na.rm, just = just, lineend = lineend,
linejoin = linejoin, ...))
})(mapping = structure(list(), class = c("ggplot2::mapping",
"uneval", "gg", "S7_object"), S7_class = structure(function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, name = "mapping", parent = structure(list(class = "gg", constructor = function (.data)
{
stop(sprintf("S3 class <%s> doesn't have a constructor",
class[[1]]), call. = FALSE)
}, validator = NULL), class = "S7_S3_class"), package = "ggplot2", properties = list(), abstract = FALSE, constructor = function (x = list(),
..., env = globalenv())
{
warn_dots_empty()
check_object(x, is.list, "a {.cls list}")
x <- lapply(x, new_aesthetic, env = env)
x <- S7::new_object(x)
class(x) <- union(c("ggplot2::mapping", "uneval"), class(x))
x
}, class = c("S7_class", "S7_object")), names = character(0)),
width = 0.9, na.rm = TRUE)`: Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
Backtrace:
▆
1. ├─gg1d::gg1d(data = mock_data, interactive = TRUE, verbose = FALSE) at test-gg1d.R:149:3
2. │ └─ggiraph::girafe(...)
3. │ ├─base::tryCatch(...)
4. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
5. │ ├─base::print(ggobj)
6. │ └─patchwork:::print.patchwork(ggobj)
7. │ └─patchwork:::build_patchwork(plot, plot$layout$guides %||% "auto")
8. │ └─base::lapply(x$plots, plot_table, guides = guides)
9. │ ├─patchwork (local) FUN(X[[i]], ...)
10. │ └─patchwork:::plot_table.free_plot(X[[i]], ...)
11. │ ├─patchwork:::plot_table(x, guides)
12. │ └─patchwork:::plot_table.ggplot(x, guides)
13. │ └─ggplot2::ggplotGrob(x)
14. │ ├─ggplot2::ggplot_gtable(ggplot_build(x))
15. │ └─ggplot2 (local) `ggplot_gtable.ggplot2::ggplot_built`(ggplot_build(x))
16. │ └─ggplot2:::by_layer(...)
17. │ ├─rlang::try_fetch(...)
18. │ │ ├─base::tryCatch(...)
19. │ │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
20. │ │ │ └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
21. │ │ │ └─base (local) doTryCatch(return(expr), name, parentenv, handler)
22. │ │ └─base::withCallingHandlers(...)
23. │ └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
24. │ └─l$draw_geom(d, layout)
25. │ └─ggplot2 (local) draw_geom(..., self = self)
26. │ └─self$geom$draw_layer(...)
27. │ └─ggplot2 (local) draw_layer(..., self = self)
28. │ └─base::lapply(...)
29. │ └─ggplot2 (local) FUN(X[[i]], ...)
30. │ ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
31. │ └─self$draw_panel(...)
32. └─base::.handleSimpleError(...)
33. └─rlang (local) h(simpleError(msg, call))
34. └─handlers[[1L]](cnd)
35. └─cli::cli_abort(...)
36. └─rlang::abort(...)
── Failure ('test-gg1d.R:165:3'): gg1d heirarchical sort works ─────────────────
Expected `gg1d(...)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
── Failure ('test-gg1d.R:175:3'): gg1d heirarchical sort works ─────────────────
Expected `gg1d(...)` to run without any errors.
i Actually got a <rlang_error> with text:
Problem while converting geom to grob.
i Error occurred in the 1st layer.
Caused by error in `draw_panel()`:
! unused arguments (lineend = "butt", linejoin = "mitre")
[ FAIL 9 | WARN 0 | SKIP 2 | PASS 47 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc