如何在R中根据分位数及其值生成格式化字符串数组？

你可以借助sprintf()函数实现数值的精确格式化，再结合分位数的名称与数值向量完成标签拼接，以下是两种高效的实现方式：

方式一：向量化直接拼接（推荐） #

labels <- sprintf("%s at %.2f", names(quantiles), as.vector(quantiles))

方式二：逐元素配对处理（适用于复杂逻辑） #

labels <- mapply(
  function(q_name, q_val) sprintf("%s at %.2f", q_name, q_val),
  names(quantiles), 
  as.vector(quantiles)
)

效果验证 #

运行代码后，labels会输出符合要求的格式：

> labels
[1] "10% at -1.20" "25% at -0.61" "50% at -0.01" "75% at 0.74" "90% at 1.29"

细节说明 #

• sprintf("%.2f", q_val)会自动将数值四舍五入保留两位小数，完美匹配你需要的精度要求。
• 相比paste0，sprintf更适合需要精确格式控制的字符串拼接场景，且原生支持向量化操作，无需额外循环。
• 生成的labels可直接用于ggplot的轴标签设置，比如：

  library(ggplot2)
  ggplot(dt, aes(y)) +
    geom_density() +
    scale_x_continuous(breaks = quantiles, labels = labels)
  

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