ggplotly: geom_path interpretation of size

For a visualization I'm making thick curves as follows:

require(ggplot2)
require(plotly)
require(Hmisc)
len=100
edge=data.frame(bezier(x=c(0, 1, 2), y=c(0, 1, 0),evaluation = len))
edge$Sequence <- sin( seq(0,pi,length.out=len) ) 
gg = ggplot(edge,aes(x = x, y = y, size = Sequence)) +  geom_path() + scale_size( range = c(.3, 20), guide = F) + theme_bw(base_size = 16) + ylim(0,.6) + scale_alpha(guide=F)
pl <- ggplotly(gg)

which in ggplot2 gives:

but which with ggplotly

pl <- ggplotly(gg)

gives

I think the problem is that ggplotly is assuming every different "size" should be considered as a separate path, whereas ggplot2 is not.

提供された R の例を ggplotly で再現し、geom_path のレンダリングを ggplot2 と比較します。ggplotly がパスに対する変化する size aesthetic をどのように解釈するかを追跡します。曲線が 1 つの連続したパスのままになり、ggplot2 の結果と一致すれば完了です。