Implementation of geom_miss_point() to plotly

I cannot run geom_miss_point() - from package naniar - inside ggplotly() function. The error message is:

In geom2trace.default(dots[[1L]][[10L]], dots[[2L]][[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

# load packages
library(plotly)
library(naniar)

#load the diamonds dataset from the ggplot2 package
data(diamonds, package = "ggplot2")

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

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

Commencez par le chemin de conversion geom2trace.default utilisé par ggplotly(), en vous concentrant sur GeomMissPoint, non pris en charge, généré par geom_miss_point() de naniar. Utilisez l’exemple diamonds fourni avec ggplotly() et toWebGL() comme reproduction ; c’est terminé lorsqu’il se rend sans l’erreur unimplemented-geom.