R语言中如何使用Sys.Date()在文件名添加当前日期实现版本控制

R语言中不能使用*+运算符*拼接字符串——+仅用于数值类型的加法运算，传入字符类型会直接触发类型不匹配错误。你之前的代码混淆了其他语言的字符串拼接逻辑，正确做法是通过paste、paste0这类专门的拼接函数实现文件名生成。

• paste0()是paste(sep = "")的语法简写，会将传入的所有片段无间隔直接拼接，非常适合生成文件名。
• 函数的参数传递逻辑：所有需要拼接的片段（固定文本、变量值、文件后缀）都作为独立的参数传入，参数之间用逗号分隔，不需要额外的连接运算符。
  • 错误写法（和其他语言逻辑混淆）：paste0("myplot" + as.character(Sys.Date()) + ".png")
  • 正确写法（符合R语法）：paste0("myplot_", as.character(Sys.Date()), ".png")

如果只需要按日期标记版本，可以直接运行以下代码：

data(sleep)
library(ggplot2) # 加载qplot依赖的包，避免函数找不到的报错

myplot <- qplot(x = group, y = extra, data=sleep)

# 生成带日期戳的文件名
png(file = paste0("myplot_", as.character(Sys.Date()), ".png"), width=600, height=350)
myplot
dev.off()

代码说明：在文件名前缀和时间戳之间加下划线_，是为了提升文件名称的辨识度，避免拼接成myplot2024-05-20.png这种难以区分前缀和时间的格式，不影响功能运行。

如果存在同一天多次生成绘图的场景，仅用日期戳会导致旧文件被新文件覆盖，可以升级为带时分秒的精确时间戳：

# 生成符合系统文件命名规则的时间戳，避免出现非法字符
file_timestamp <- format(Sys.time(), "%Y%m%d_%H%M%S")
png(file = paste0("myplot_", file_timestamp, ".png"), width=600, height=350)
myplot
dev.off()

• 不要直接使用as.character(Sys.time())生成文件名，因为转换后的字符串包含冒号（如2024-05-20 14:30:00），这类字符在Windows系统下属于非法文件名字符，必须提前用format()将分隔符替换为下划线等合法字符。
• 推荐使用%Y%m%d_%H%M%S格式生成时间戳，这种格式的字符串字典排序顺序和真实时间先后完全一致，后续整理文件目录时可以直接按文件名排序，不需要额外做时间格式转换。
• 基础R内置的sprintf()也可以实现格式化拼接，效果和paste0一致，习惯占位符写法的可以用这种方式：

  # 等价的拼接效果
  sprintf("myplot_%s.png", file_timestamp)
  

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