Empty objects in subplot

An error arises when mix an empty object with ggplot-derived plotly in subplot

library(plotly); library(ggplot2)
df <- data.frame(dose=c("D0.5", "D1", "D2"), len=c(4.2, 10, 29.5))
p<-ggplot(data=df, aes(x=dose, y=len)) +geom_bar(stat="identity")
ply <- ggplotly(p)
# This gives an error.
subplot(ply, ply, ggplotly(ggplot()), nrows=1, shareX=F, shareY=F, margin=0, widths=c(0.3, 0.3, 0.3))
# This gives a warning.
subplot(ply, ply, plotly_empty(type = "scatter"), nrows=1, shareX=F, shareY=F, margin=0, widths=c(0.3, 0.3, 0.3))

What are the possible solutions? Thanks!

Commencez par exécuter l’exemple R reproductible avec ggplotly(), subplot() et plotly_empty() afin d’observer l’erreur et l’avertissement. Examinez la gestion des objets de graphique vides par subplot et définissez une couverture de régression pour les deux cas ; le travail est terminé lorsque des objets vides peuvent être combinés sans erreur ni avertissement.