R语言如何不打印输出直接拼接数值与字符串并赋值给新变量

首先澄清一个常见认知偏差：你观察到paste()运行后直接打印结果，是R交互控制台的默认行为——只要你不把函数返回值赋值给变量，控制台就会自动输出运行结果。只要加上赋值操作，paste()本身不会主动触发打印，完全可以用来给新变量赋值。

你之前踩的两个典型坑：

• cat()的设计目标就是输出内容到控制台/文件连接，它本身的返回值是NULL，根本不能用来保存拼接结果
• merge()是用于数据框按匹配键合并的函数，完全不是字符串拼接工具；toString()本质是固定用逗号做分隔符的封装版paste，自然会在拼接对象之间生成多余逗号

以下是可以直接满足需求的实现方法，所有方法只要将结果赋值给变量就不会触发打印：

• 方法1：sprintf()格式化拼接（最容易精准控制输出格式）
  可以直接通过格式符控制数值展示形式，刚好匹配你要的「小数点前不带0」的效果：

  x <- .9
  # 先把数值格式化为1位小数，再替换掉前导0
  res <- sprintf("Area Under Curve: %s", sub("^0\\.", ".", sprintf("%.1f", x)))
  # 查看res的结果
  res
  # > [1] "Area Under Curve: .9"
  

• 方法2：paste()/paste0()基础R拼接
  用paste()时默认分隔符是空格，用paste0()默认无分隔符，提前处理好数值格式即可：

  x <- .9
  res <- paste("Area Under Curve:", sub("^0\\.", ".", format(x, nsmall = 1)))
  

• 方法3：stringr::str_c()（tidyverse生态常用）
  这个函数和paste0()逻辑类似，拼接效率更高，处理NA的逻辑更符合常规预期：

  # 需先安装加载stringr包
  library(stringr)
  x <- .9
  res <- str_c("Area Under Curve: ", sub("^0\\.", ".", as.character(x)))
  

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