如何在R

Question

我正在Shiny仪表板中集成一个绘图图。我根据仪表板布局减小了可打印图表的大小。

但是，工具栏的大小并未减小，因此当我将鼠标悬停在图表上时，图表上的某些信息将被隐藏。

以下是存在此问题的图表：

下面是我的代码：

p <- plot_ly(b1image, x = b1image$CNT, y = b1image$Label, type = 'bar', orientation = 'h', 
             marker = list(color = viridis::viridis_pal(option = "C", direction =1)(max(b1image$Label) - min(b1image$Label) + 5)))
p

我想知道是否有办法减小此工具栏的大小，以使其不隐藏图表信息。或者，我可以取消此工具栏，但希望可以选择通过将鼠标悬停来获取栏值。

谢谢。

Answer 1

您确实可以禁用工具栏

通过添加

和自定义条值消息可以在悬停时可用 hoverinfo（默认情况下，它们已经显示了未格式化的信息

p <- p %>% config(displayModeBar = F) 删除栏。

并在add_trace内添加以下内容以自定义信息消息：

p <- plot_ly()
p <- add_trace(p, data = ..., x = ~columnname, y = ~columnname, 
     hoverinfo = "text", 
     text = ~paste ('<br>', 'bla bla : ',parametername, i.e. a column your plotting))

p