R语言Plotly漏斗图修改数字格式化：取消千位缩写显示完整整数

你只需要在原有代码基础上新增格式控制参数即可，修改后的完整代码如下：

val = as.list(df[,2])
txt = as.list(df[,1])

library(plotly)

fig <- plot_ly()

fig <- fig  %>%  
  add_trace(
    type = "funnel",
    # 自定义漏斗块文本显示格式，禁用数值缩写
    texttemplate = "%{value:.0f} %{percentInitial:.1%}",
    # 自定义悬停提示文本格式
    hovertemplate = "阶段：%{y}<br>数值：%{x:.0f}<br>占初始值比例：%{percentInitial:.1%}<extra></extra>",
    opacity = 0.65,
    x = val,
    y = txt,
    connector = list(line = list(color = "royalblue", dash = "dot", width = 3)), 
    colorbar = list(exponentformat = 'none')
  )

fig <- fig %>% 
  layout(
    hovermode = "closest",
    # 配置X轴刻度格式，禁用缩写
    xaxis = list(
      tickformat = ".0f",
      exponentformat = "none"
    )
  )

fig

关键改动说明 #

• 新增texttemplate参数：替换原有textinfo配置，直接指定漏斗块上显示的数值为不带小数的完整整数，不会自动生成k、M这类单位缩写，百分号的小数位数可以根据需求调整。
• 新增hovertemplate参数：控制鼠标悬停时的提示框数值格式，避免悬停场景下仍出现数值缩写。
• 新增xaxis配置：在layout中设置X轴刻度禁用科学计数法和SI单位缩写，保证坐标轴刻度也显示完整整数。

小提示：如果需要数值显示千位分隔符（如12000显示为12,000），只需把代码中所有.0f替换为,.0f即可。

内容的提问来源于stack exchange，提问作者S44