Make it easier to modify 'special' plot elements

These could work like style() or colorbar() and be used to, say, modify annotations after-the-fact to add some hovertext:

p <- ggplot(mtcars, aes(mpg, wt)) + geom_point() + facet_wrap(~vs)
ggplotly(p) %>% annotations(
  which = 1, 
  hovertext = "Hover text for first panel", 
  hoverlabel = list(bgcolor = "black")
)

首先审查现有的 style() 和 colorbar() API，然后跟踪 ggplotly() 创建图表后注释的表示和修改方式。完成的标准是，用户可以选择一个特殊的绘图元素（例如第一个分面中的注释），并更新包括 hovertext 和 hoverlabel 在内的属性。