geom_GeomMissPoint() has yet to be implemented in plotly

Warning: Removed 5625 rows containing non-finite values (stat_summary).
Warning in geom2trace.default(dots[[1L]][[1L]], dots[[2L]][[1L]], dots[[3L]][[1L]]) :
geom_GeomMissPoint() has yet to be implemented in plotly.
If you'd like to see this geom implemented,
Please open an issue with your example code at
https://github.com/ropensci/plotly/issues

library(naniar)
# fake some missing data
diamonds$price_miss <- ifelse(diamonds$depth>60, diamonds$price, NA)

p <- ggplot(diamonds, aes(x = clarity, y = log(price_miss))) +
    naniar::geom_miss_point(alpha = 0.1) + 
    stat_summary(fun.data = "mean_cl_boot", colour = "black") +
    facet_wrap(~cut)

ggplotly(p)

Commencez par l’exemple fourni avec naniar et ggplot2, puis suivez l’avertissement geom2trace.default pour geom_GeomMissPoint(). Identifiez comment les geoms pris en charge sont convertis pour ggplotly et ajoutez une gestion équivalente pour geom_miss_point, en vérifiant le résultat en réexécutant l’exemple sans l’avertissement concernant un geom non pris en charge.