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)

Beginne mit dem mitgelieferten naniar- und ggplot2-Beispiel und verfolge dann die geom2trace.default-Warnung für geom_GeomMissPoint(). Ermittle, wie unterstützte Geoms für ggplotly konvertiert werden, und ergänze eine entsprechende Behandlung für geom_miss_point, verifiziert durch erneutes Ausführen des Beispiels ohne die Warnung zu nicht unterstützten Geoms.