Default frame size with `highlight(..., selectize = TRUE)`

The frame of plots with the selectize.js widget are by default not well scaled. The y-axis is not visible.

Example:

library(tidyverse)
library(plotly)
p <- iris %>%
  highlight_key(~Species) %>% 
  ggplot(aes(x = Sepal.Length, y = Sepal.Width, color = Species)) +
  geom_point()
pp <- ggplotly(p, tooltip = "Species")
highlight(pp, selectize = TRUE)

It is possible to adjust the layout with

highlight(pp, selectize = TRUE) %>% layout(autosize = FALSE, width = '100%', height = '100%')

but maybe a better default would be good?

まず、提供されている iris の例を highlight(pp, selectize = TRUE) で実行し、layout(autosize = FALSE, width = '100%', height = '100%') の回避策と比較します。highlight(..., selectize = TRUE) のエントリポイントを追跡し、その回避策なしでデフォルトの frame が y 軸を表示したままにすべきかどうかを判断します。