Hovertemplate无法识别我传递给它的文本向量

Question

我使用plotly创建了下面的条形图，但是当我给text赋值时，它在我的hovertemplate中不被识别。

library(plotly)
    "Country(s)"<-c("United Kingdom", "Brazil", "United States Of America", "India", 
      "Russian Federation")
    "Number of cases"<-c(1032990, 1264637, 5905072, 618694, 735681)
    "lab"<-c("1.0M", "1.3M", "5.9M", "618.7K", "735.7K")
    cm4d<-data.frame(`Country(s)`,`Number of cases`,lab)
    
    fig1 <- plot_ly(cm4d, x = ~`Country(s)`, y = ~`Number of cases`,text=~lab,
                    type = 'bar',
                    hovertemplate = paste('%{x}', '<br>Number of cases: %{text}<br><extra></extra>'),
                    colors = c("#60ab3d","#6bbabf","#c4d436","#3e5b84","#028c75"),
                    color = ~`Country(s)`)
    fig1

虽然这是可行的

library(plotly)
library(dplyr)

full_data<-data.frame("Name"=c("Q1","Q2","Q3","Q1","Q2","Q3"),"Values"=c(245645,866556,26440,65046,641131,463265),
                      "Week"=c("a","b","c","d","e","f"))
desc <- full_data %>% 
  group_by(Name,Week) %>% 
  summarise(values = sum(Values)) %>%
  mutate(lab = scales::label_number_si(accuracy = 0.1)(values))


fig1 <- plot_ly(desc, x = ~`Name`, y = ~values,text = ~lab,
                type = 'bar',
                hovertemplate = paste('%{x}', '<br>Number of cases: %{text}<br><extra></extra>'),
                colors = c("#60ab3d","#6bbabf","#c4d436"),
                color = ~Name)
fig1

Answer 1

我不确定这是不是一个“答案”。我想你碰到虫子了！看起来{plotly}想要一个“堆叠”的条形图。

当您将desc数据帧限制为单行时，您可以快速地使您的工作解决方案“失败”。

fig2 <- plot_ly(desc[c(1,3,5), ]
               , x = ~`Name`, y = ~values,text = ~lab
               , type = 'bar'
               , hovertemplate = paste('%{x}', '<br>Number of cases: %{text}<br><extra></extra>'),
                colors = c("#60ab3d","#6bbabf","#c4d436"),
                color = ~Name)
fig2

有了这样的“单个关键元素”数据帧，fig2在悬停文本中显示了恼人的%text！

我还没有找到绕过这个问题的方法。