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

> ### Name: annotate_interactive
> ### Title: Create interactive annotations
> ### Aliases: annotate_interactive
> 
> ### ** Examples
> 
> # add interactive annotation to a ggplot -------
> library(ggplot2)
> library(ggiraph)
> 
> gg <- ggplot(mtcars, aes(x = disp, y = qsec )) +
+   geom_point(size=2) +
+   annotate_interactive(
+     "rect", xmin = 100, xmax = 400, fill = "red",
+     data_id = "an_id", tooltip = "a tooltip",
+     ymin = 18, ymax = 20, alpha = .5)
> 
> x <- girafe(ggobj = gg, width_svg = 5, height_svg = 4)
Error:
! Problem while converting geom to grob.
ℹ Error occurred in the 2nd layer.
Caused by error in `check.length()`:
! 'gpar' element 'lwd' must not be length 0
Backtrace:
     ▆
  1. ├─ggiraph::girafe(ggobj = gg, width_svg = 5, height_svg = 4)
  2. │ ├─base::tryCatch(...)
  3. │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
  4. │ ├─base::print(ggobj)
  5. │ └─ggplot2:::print.ggplot(ggobj)
  6. │   ├─ggplot2::ggplot_gtable(data)
  7. │   └─ggplot2:::ggplot_gtable.ggplot_built(data)
  8. │     └─ggplot2:::by_layer(...)
  9. │       ├─rlang::try_fetch(...)
 10. │       │ ├─base::tryCatch(...)
 11. │       │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
 12. │       │ │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
 13. │       │ │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
 14. │       │ └─base::withCallingHandlers(...)
 15. │       └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
 16. │         └─l$draw_geom(d, layout)
 17. │           └─ggplot2 (local) draw_geom(..., self = self)
 18. │             └─self$geom$draw_layer(...)
 19. │               └─ggplot2 (local) draw_layer(..., self = self)
 20. │                 └─base::lapply(...)
 21. │                   └─ggplot2 (local) FUN(X[[i]], ...)
 22. │                     ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
 23. │                     └─self$draw_panel(data, panel_params, coord, .ipar = `<chr>`)
 24. │                       └─ggiraph (local) draw_panel(..., self = self)
 25. │                         ├─ggiraph:::ggname(...)
 26. │                         │ └─grid::grobName(grob, prefix)
 27. │                         ├─grid::rectGrob(...)
 28. │                         │ └─grid::grob(...)
 29. │                         └─grid::gpar(...)
 30. │                           └─grid:::validGP(list(...))
 31. │                             └─grid (local) numnotnull("lwd")
 32. │                               └─grid (local) check.length(gparname)
 33. │                                 └─base::stop(...)
 34. └─base::.handleSimpleError(...)
 35.   └─rlang (local) h(simpleError(msg, call))
 36.     └─handlers[[1L]](cnd)
 37.       └─cli::cli_abort(...)
 38.         └─rlang::abort(...)
Execution halted