Running examples in ‘rphylopic-Ex.R’ failed
The error most likely occurred in:

> ### Name: add_phylopic
> ### Title: Annotate a ggplot plot with PhyloPics
> ### Aliases: add_phylopic
> 
> ### ** Examples
> 
> # Put a silhouette behind a plot based on a taxonomic name
> library(ggplot2)
> ggplot(iris) +
+   add_phylopic(x = 6.1, y = 3.2, name = "Iris", alpha = 0.2) +
+   geom_point(aes(x = Sepal.Length, y = Sepal.Width))
Warning in checkValidSVG(doc, warn = warn) :
  This picture was not generated by Cairo graphics; errors may result
Error:
! Problem while converting geom to grob.
ℹ Error occurred in the 1st layer.
Caused by error in `if (remove_background && path@gp$fill %in% c("#FFFFFFFF", "#FFFFFF")) ...`:
! missing value where TRUE/FALSE needed
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$draw_layer(...)
 16. │             └─ggplot2 (local) draw_layer(..., self = self)
 17. │               └─base::lapply(...)
 18. │                 └─ggplot2 (local) FUN(X[[i]], ...)
 19. │                   ├─rlang::inject(self$draw_panel(data, panel_params, coord, !!!params))
 20. │                   └─self$draw_panel(data, panel_params, coord, na.rm = FALSE, remove_background = TRUE)
 21. │                     └─rphylopic (local) draw_panel(..., self = self)
 22. │                       └─base::lapply(...)
 23. │                         └─rphylopic (local) FUN(X[[i]], ...)
 24. │                           └─rphylopic:::phylopicGrob(...)
 25. │                             ├─rphylopic::recolor_phylopic(img, alpha, color, remove_background)
 26. │                             └─rphylopic:::recolor_phylopic.Picture(img, alpha, color, remove_background)
 27. │                               └─rphylopic:::recolor_content(img, alpha, color, remove_background)
 28. │                                 └─base::lapply(...)
 29. │                                   └─rphylopic (local) FUN(X[[i]], ...)
 30. └─base::.handleSimpleError(...)
 31.   └─rlang (local) h(simpleError(msg, call))
 32.     └─handlers[[1L]](cnd)
 33.       └─cli::cli_abort(...)
 34.         └─rlang::abort(...)
Execution halted