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))

Comienza por la ruta de conversión geom2trace.default utilizada por ggplotly(), centrándote en el GeomMissPoint no compatible generado por geom_miss_point() de naniar. Usa el ejemplo proporcionado de diamonds con ggplotly() y toWebGL() como reproducción; se considera terminado cuando se renderiza sin el error unimplemented-geom.