我使用ggplotly绘制图形。当光标移动到图形顶部时，我使用工具提示功能来表示条形图中的值。

Source_Data <-
data.frame(
key = c(1,1,2,3,3),Product_Name = c(
  "Table","Table","Chair","Bed","Sofa","Sofa"
 ),Product_desc = c("XX","XXXX","YY","X","Z","ZZZ","A","Y","A"),sd = c(0.1,0.3,0.4,0.5,0.6,0.7,0.8,0.5),Cost = c(1,4,5,6)

 )


ggplotly((
Source_Data %>%
ggplot(
  aes(
    Product_Name,Cost,ymin = Cost - sd,ymax = Cost + sd,fill = Product_desc,text = paste("Product Name:",Product_Name,"<br>","Cost:",Cost)
  )
  ) +
  geom_col(position = position_dodge2(width = .9,preserve = "single")) +
  geom_errorbar(position = position_dodge2(
  width = .9,preserve = "single",padding = .5
  )) +
  geom_text(
  aes(y = Cost + sd,label = Cost),position = position_dodge2(width = .9),vjust = -1
  ) +
  facet_wrap( ~ key,scales = "free_x",strip.position = "bottom") +
  theme(strip.placement = "outside") +
  theme_bw()
  ),tooltip = "text"
  )

当我将光标移到条形上方时，我会得到文本值，这很好。但是，当我将其移动到错误栏的顶部时，我也将获得不同颜色的文本值。有没有办法我只能在条形图的顶部而不是在错误条形图上获取文本/标签值？