如何在剧情中自定义或显示模式栏？

Question

我想自定义模式栏（在右上角），以便只保持“缩放”，“平移”，“框选择”，“放大”和“缩小”。如果不可能，我更喜欢显示模式栏。

这里的图表和代码：

x <- c(1:15)
y <- c(1:15)
xy <- as.data.frame(cbind(x,y))
example <- ggplot(data = xy,aes(x = x,y = y))+geom_line()
ggplotly(example)

感谢您的帮助

Answer 1

使用您的示例：

x <- c(1:15)
y <- c(1:15)
xy <- as.data.frame(cbind(x,y))
example <- ggplot(data = xy,aes(x = x,y = y))+geom_line()

ggplotly(example) %>% config(displaylogo = FALSE,
modeBarButtonsToRemove = list(
    'sendDataToCloud',
    'toImage',
    'autoScale2d',
    'resetScale2d',
    'hoverClosestCartesian',
    'hoverCompareCartesian'
))

Example output

其他选项包括：'zoom2d'，'pan2d'，'select2d'，'lasso2d'，'zoomIn2d'和'zoomOut2d'

Answer 2

连接要删除的按钮，而不是列表。

以下适用于我：

x <- c(1:15)
y <- c(1:15)
xy <- as.data.frame(cbind(x, y))
example <- ggplot(data = xy, aes(x = x, y = y)) + geom_line()

ggplotly(example) %>% config(displaylogo = FALSE,
modeBarButtonsToRemove = c(
    'sendDataToCloud',
    'toImage',
    'autoScale2d',
    'resetScale2d',
    'hoverClosestCartesian',
    'hoverCompareCartesian'
))