Как я могу управлять интерактивной панелью инструментов на графике в R блестящий?

Question

Как я могу манипулировать панелью инструментов (я не уверен, правильно ли указано имя?! .) сюжета, который генерируется plotly упаковка в блестящем? это мой код в server боковая сторона:

 plot_ly(pl.d, x = ~x, y = ~y1, type = 'bar', name = colnames(dataset())[2], marker = list(color = "#26478A"),
            height=800) %>%
      add_trace(y = ~y2, name = colnames(dataset())[3], marker = list(color = "#FF6600")) %>%
      add_trace(y = ~y3, name = colnames(dataset())[4], marker = list(color = "#7E182F")) %>%
      layout("title" = colnames(d.plot)[1],
             xaxis = list(title = "", tickangle = 65,tickfont  = list(family= "Arial",size = 14),
                          margin = m
                          ), 
             yaxis = list(title = "",ticksuffix = "%"),
             barmode = 'group'
            # autosize = F, width = 500, height = 500,,margin = m
             ) 

Answer 1

Не уверен, что именно вы хотите изменить на панели инструментов, но если вы хотите убрать некоторые элементы, вы можете использовать config(modeBarButtonsToRemove = list("lasso2d","hoverClosestCartesian", "hoverCompareCartesian","select2d")) По крайней мере, для ggplotly это так, но я уверен, что вы можете использовать это и с функцией plotly.