小编Nik*_*ers的帖子

我想放大使用 的绘图上的 y 轴rangeslider。

一个可重现的例子：

library(ggplot2)
library(plotly)
p <- ggplot(faithful, aes(x = waiting)) +
    geom_histogram(bins = 30)
p <- ggplotly(p)
p <- rangeslider(p)
p

我可以缩放的方式如下：

但是，我希望也能够像这样缩放（这是通过不添加 来完成的rangeslider）：

我认为这可以通过使用类似的东西来完成

p <- layout(p, dragmode = "zoom")

但我没能完成这项工作。