如何在R语言中使用dplyr提取数据列的公共唯一日期

前置准备 #

首先确保你已经安装并加载了dplyr包：

# 首次使用先安装包
install.packages("dplyr")
# 加载包
library(dplyr)

实现步骤 #

我们以你给出的示例数据为例，完整实现流程如下：

1. 构造示例数据框（如果是你自己的数据集可以跳过这一步，直接替换为你的数据框即可）

df <- data.frame(
  date_col = c("1/1/2004", "1/1/2004", "1/1/2004", "1/2/2004", "1/2/2004", "2/3/2004", "2/3/2004", "3/4/2004", "3/4/2004")
)

2. 提取唯一日期

• 如果你需要输出结果为数据框格式，直接使用dplyr的distinct()函数即可，该函数会自动对指定列去重：

unique_date_df <- df %>% 
  distinct(date_col)

• 如果你需要输出结果为向量格式，可以搭配pull()函数提取列内容：

unique_date_vec <- df %>% 
  distinct(date_col) %>% 
  pull(date_col)

输出验证 #

执行上述代码后得到的结果和你期望的输出完全一致：

1/1/2004
1/2/2004
2/3/2004
3/4/2004

补充提示 #

如果后续需要对日期做时间运算，可以使用lubridate包的mdy()函数将字符型日期转换为标准日期格式，刚好适配示例中「月/日/年」的写法：

# 转换为标准日期格式
unique_date_df$date_col <- lubridate::mdy(unique_date_df$date_col)

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