如何从ggplotly图中删除选项栏？

Question

我有一个使用shiny和plotly在ggplot2中呈现的情节。但是，我不希望显示悬停时出现的选项栏。有没有办法使用ggplotly(p)并删除选项栏？

Answer 1

community plotly短版本有一个很好的答案：

library(plotly)
set.seed(100)
d <- diamonds[sample(nrow(diamonds), 1000), ]

使用ggplotly：

p <- ggplot(d, aes(carat, price)) + geom_point()
ggplotly(p) %>% config(displayModeBar = F)

如果你没有使用ggplotly，你可以这样做：

plot_ly(d, x = carat, y = price, text = paste("Clarity: ", clarity),
mode = "markers", color = carat, size = carat) %>% config(displayModeBar = F)