Add 'viewbox' attribute to ggplotly svg output to allow scaling in R Markdown

Hi,
I would like to autoscale SVG graphics produced by a call to ggplotly in order to fit them into the parent CSS container in a R Markdown document, as described here. For this, it is necessary for the SVG element to have a viewBox attribute that describes the bounding box of the visible contents. Do you think it would be possible to extend your package to include this attribute?

Cheers,
Andrzej

ggplotly の SVG 出力パスから開始し、生成された SVG を調べて可視コンテンツの境界を確認します。R Markdown の親 CSS コンテナ内でスケーリングできるように viewBox 属性を追加し、その後、R Markdown ドキュメント内で生成されたグラフィックが正しくスケーリングされることを確認します。