R绘图：在极谱图中添加文本

Question

假设我有一个使用R plotly的简单散点图。 而且我想在散点图的每个点上放置文本，如图所示。

简单的R极坐标图：

library(plotly)

p <- plot_ly(
  type = 'scatterpolar',
  r = c(0,1,2,2),
  theta = c(0,45,90,120),
  size = c(10, 20, 30, 40),
  sizes = c(100, 300),
  mode = 'markers'
)
p

输出图表：

以与plot_ly和scatterpolar一起使用的相同方式，如何将文本放在每个气泡的中心，并带有一些值，比如size列的值？？

预先感谢！

Answer 1

添加答案，以备将来在SO社区中参考。 我使用add_trace

找到了解决方案

R代码：

library(plotly)

p <- plot_ly(
  type = 'scatterpolar',
  r = c(0,1,2,2),
  theta = c(0,45,90,120),
  size = c(10, 20, 30, 40),
  sizes = c(100, 300),
  mode = 'markers'
) %>%
  add_trace(
    r = c(0,1,2,2), 
    theta = c(0,45,90,120),
    mode = "text",
    text = c(10, 20, 30, 40),
    textfont = list(color = '#000000', size = 12)
  ) 
p

图表：