R Plotly - 更改 hoverinfo 的字体和不透明度

R Plotly - Change font and opacity of hoverinfo

我正在尝试更改绘图图中悬停信息框的字体和不透明度(使用 R)。我使用了以下代码,但不知道如何更改悬停框的字体或不透明度,如果可能的话?

plotC <- plot_ly(tg, x = ~FINPERCH, y = ~JourneyTime, type = 'scatter', mode = 'lines',color = ~PeakDirection, colors=pal, linetype = ~PeakDirection,height = 500, width = 1200,

hoverinfo= 'text', text = ~paste("<b>Period: </b>", FINPERCH,'<br><b>Direction / Peak :</b>', PeakDirection,'<br><b>Average Journey Time:</b>',JourneyTime,'mins'))%>%

我不想给图表本身添加任何注释。我只想设置悬停的字体和透明度。

如有任何建议,我们将不胜感激。 谢谢

可以使用htmltools::htmlDependency在plot中添加CSS,如图:

library(htmltools)
library(htmlwidgets)

p <- plot_ly(mtcars, x=~cyl, y=~mpg) 


x <- as_widget(p)                                 # convert to htmlwidget object 
# add a the code directly into <head> using `htmltools::htmlDependency`
x$dependencies <- c(x$dependencies,
  list(
    htmlDependency(
      name = "custom",
      version="1",
      src="",
      head='
        <style type="text/css">
        .hovertext {
            opacity: 0.5
        }
        </style>
      '
    )
  )
)