在R语言中为列名添加日期后缀的实现方法

基础R实现方法 #

因为$语法无法直接在变量名中嵌入函数调用，推荐使用方括号索引的方式，步骤如下：

1. 先拼接好带日期后缀的变量名：

# 生成格式为flag_YYYY-MM-DD的变量名
var_name <- paste0("flag_", Sys.Date())

如果需要自定义日期格式，可以用format()函数指定，比如：

var_name <- paste0("flag_", format(Sys.Date(), "%Y%m%d")) # 生成flag_20240820这种无横杠的格式

2. 用双括号索引给数据框赋值：

mr_data[[var_name]] <- ifelse(is.na(mr_data$age), 1, 0)

tidyverse/dplyr实现方法 #

如果你习惯用dplyr的管道风格，可以结合动态变量名赋值的写法：

library(dplyr)

var_name <- paste0("flag_", Sys.Date())
mr_data <- mr_data %>% 
  mutate(!!var_name := ifelse(is.na(age), 1, 0))

这里的!!是解引用符号，用来把字符串变量名转换成dplyr能识别的列名，:=是动态赋值的专用运算符。

原写法无效的原因 #

你之前尝试的mr_data$flag_Sys.date()是错误的，因为$运算符后面必须是固定的、直接的变量名，不能嵌入函数调用（比如Sys.date()），所以无法解析成合法的列名。

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