如何在漏斗图中有固定大小但动态悬停文本？

Question

我正在尝试使用 R 制作漏斗图。

问题是数字是倾斜的，它们不会有统一的表示。但是，我们想要显示流程。那么如何在 R 中制作漏斗图，其中漏斗的大小是固定的，但文本是动态的并且来自数据框列。

查看源代码示例： https://plot.ly/r/funnel-charts/

requiredPackages <- c("plotly")

ipak <- function(pkg){
  new.pkg <- pkg[!(pkg %in% installed.packages()[, "Package"])]
  if (length(new.pkg))
    install.packages(new.pkg, dependencies = TRUE)
  sapply(pkg, require, character.only = TRUE)
}

ipak(requiredPackages)

p <- plot_ly(
  type = "funnelarea",
  values = c(5, 4, 3, 2, 1),
  text = c("The 1st","The 2nd", "The 3rd", "The 4th", "The 5th"),
  marker = list(colors = c("deepskyblue", "lightsalmon", "tan", "teal", "silver"),
                line = list(color = c("wheat", "wheat", "blue", "wheat", "wheat"), 
  width = c(0, 1, 5, 0, 4))),
  textfont = list(family = "Old Standard TT, serif", size = 13, color = "black"),
  opacity = 0.65)

p

结果

Answer 1

_{我想像上面那样显示漏斗图；但在悬停时我想显示不同的文字。隧道只是代表形状，但悬停会显示实际值。}

根据 OP 的上述评论，我猜他们想要 hoverinfo 从这个值向量中选择它的文本 c(5,4,3,2,1)。

第一个 graph/solution 适用于此：

library(plotly)

plot_ly(
  type = "funnelarea",
  values = c(5, 4, 3, 2, 1),
  text = c("The 1st","The 2nd", "The 3rd", "The 4th", "The 5th"),
  marker = list(colors = c("deepskyblue", "lightsalmon", "tan", "teal", "silver"),
                line = list(color = c("wheat", "wheat", "blue", "wheat", "wheat"),
  width = c(0, 1, 5, 0, 4))),
  textfont = list(family = "Old Standard TT, serif", size = 13, color = "black"),
  opacity = 0.65,
  hovertemplate = '%{value}<extra></extra>')

可以添加更多 text/values。下面是一个例子。您可以在这里阅读更多内容：https://plot.ly/r/hover-text-and-formatting/

plot_ly(
  type = "funnelarea",
  values = c(5, 4, 3, 2, 1),
  text = c("The 1st","The 2nd", "The 3rd", "The 4th", "The 5th"),
  marker = list(colors = c("deepskyblue", "lightsalmon", "tan", "teal", "silver"),
                line = list(color = c("wheat", "wheat", "blue", "wheat", "wheat"), 
  width = c(0, 1, 5, 0, 4))),
  textfont = list(family = "Old Standard TT, serif", size = 13, color = "black"),
  opacity = 0.65,
  hovertemplate = paste('%{value}<extra></extra>' ,
                        '%{text}<extra></extra>'))

如何在漏斗图中有固定大小但动态悬停文本？

How to have fixed size in funnel chart but dynamic hover text?

r

hover

plotly

r-plotly

结果