Running examples in 'ggtrace-Ex.R' failed
The error most likely occurred in:

> ### Name: geom_path_trace
> ### Title: Trace lines
> ### Aliases: geom_path_trace geom_line_trace geom_step_trace
> 
> ### ** Examples
> 
> # Modify line color for each group
> ggplot2::ggplot(
+   stocks,
+   ggplot2::aes(day, value, fill = name)
+ ) +
+   geom_line_trace() +
+   ggplot2::theme_minimal()
> 
> # Modify outline color for each group
> ggplot2::ggplot(
+   stocks,
+   ggplot2::aes(day, value, color = name)
+ ) +
+   geom_line_trace() +
+   ggplot2::theme_minimal()
> 
> # Specify outline color for each group
> clrs <- c(
+   CAC  = "#E69F00",
+   DAX  = "#0072B2",
+   FTSE = "#009E73",
+   SMI  = "#56B4E9"
+ )
> 
> ggplot2::ggplot(
+   stocks,
+   ggplot2::aes(day, value, color = name)
+ ) +
+   geom_line_trace(stroke = 1) +
+   ggplot2::scale_color_manual(values = clrs) +
+   ggplot2::theme_minimal()
> 
> # Outline a subset of data points
> ggplot2::ggplot(
+   stocks,
+   ggplot2::aes(day, value, color = name)
+ ) +
+   geom_line_trace(trace_position = day > 1500, stroke = 1) +
+   ggplot2::theme_minimal()
Error in `create_trace_layers()`:
! Problem while converting geom to grob.
ℹ Error occurred in the 1st layer.
Caused by error:
! cannot allocate vector of size 29 Kb
Backtrace:
     ▆
  1. ├─base (local) `<fn>`(x)
  2. ├─ggplot2:::print.ggplot(x)
  3. │ ├─ggplot2::ggplot_gtable(data)
  4. │ └─ggplot2:::ggplot_gtable.ggplot_built(data)
  5. │   └─ggplot2:::by_layer(...)
  6. │     ├─rlang::try_fetch(...)
  7. │     │ ├─base::tryCatch(...)
  8. │     │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
  9. │     │ │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
 10. │     │ │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
 11. │     │ └─base::withCallingHandlers(...)
 12. │     └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
 13. │       └─l$draw_geom(d, layout)
 14. │         └─ggplot2 (local) draw_geom(..., self = self)
 15. │           └─self$geom$handle_na(data, self$computed_geom_params)
 16. │             └─ggtrace (local) handle_na(...)
 17. │               └─ggtrace (local) drop_na_values(data, warn = FALSE)
 18. │                 └─stats::ave(complete, dat$group, FUN = keep_mid_true)
 19. │                   ├─base::`split<-`(`*tmp*`, g, value = lapply(split(x, g), FUN))
 20. │                   └─base::`split<-.default`(...)
 21. │                     ├─base::split(seq_along(x), f, drop = drop, ...)
 22. │                     └─base::split.default(seq_along(x), f, drop = drop, ...)
 23. └─base::.handleSimpleError(...)
 24.   └─rlang (local) h(simpleError(msg, call))
 25.     └─handlers[[1L]](cnd)
 26.       └─cli::cli_abort(...)
 27.         └─rlang::abort(...)
Execution halted