r - 使 plotly 注释字体加粗

Question

我想添加 annotation到 scatter由 R 生成的图的 plotly包，并以粗体显示文本。

我想:

library(plotly)
library(dplyr)

set.seed(1)
df <- data.frame(x=rnorm(10),y=rnorm(10))
plotly::plot_ly(x =~ df$x, y =~ df$y,marker = list(size=12), type = 'scatter',mode = "markers") %>%
  plotly::add_annotations(text=1:10,showarrow=T,arrowhead=1,x=df$x,y=df$y,font=list(size=10))

这使:


正在尝试添加 face="bold"到 font规范 list :

plotly::plot_ly(x =~ df$x, y =~ df$y,marker = list(size=12), type = 'scatter',mode = "markers") %>%
  plotly::add_annotations(text=1:10,showarrow=T,arrowhead=1,x=df$x,y=df$y,font=list(size=10,face="bold"))

并没有真正改变任何东西:


所以问题是如何让该文本注释以粗体显示。

附言
在我的真实数据中，我想注释点簇，因此注释作为单独的层出现。

Answer 1

只需将文本输入为 HTML，如下所示:

plotly::plot_ly(x =~ df$x, y =~ df$y,marker = list(size=12), type = 'scatter',mode = "markers") %>%
  plotly::add_annotations(text=sprintf("<b>%s</b>", 1:10),showarrow=T,arrowhead=1,x=df$x,y=df$y,font=list(size=10))