更改绘图悬停框R的位置

我想更改悬停框在

条形图中的位置。与其让它在左边或右边弹出，我希望它在横条上方弹出。这可能吗？我在谷歌上搜索了几个小时，一直盯着Plotly R的参考页面，但运气不好

以下是一个示例：

library(dplyr)
library(plotly)
data.frame(x = 1:10, y = 1:10*10) %>% 
  plotly::plot_ly(data = .) %>%
  plotly::add_trace(x = ~x, 
                    y = ~y, 
                    type = 'bar', 
                    hoverinfo = "text", 
                    text = ~y)

g%plotly:：plot_-ly（data=）%%>%plotly:：add_-trace（x=~y，y=~x，type='bar'，hoverinfo=“text”，text=~y，orientation=“h”）
足够近了吗？我知道可以在
plotly.js
中完成，但在
r
中，我找不到任何相关内容。@M-M谢谢，但我需要保留专栏。Plotly在R中似乎缺少很多功能。即使是粗体文本也是一件麻烦事。