R中将dd/mm/yyyy拼接小时整数的文本列转换为标准%d/%m/%Y H:M格式

原始列字符串结构为%d/%m/%Y格式日期拼接单/双位小时值，可通过两类方法转换为要求的%d/%m/%Y H:M格式，实现单数字小时自动补前导零、统一拼接分钟值的输出效果。

原生R实现（无额外包依赖） #

核心逻辑是拆分原字符串的日期段、小时段，对小时值补零后拼接为目标格式，完整可运行代码如下：

# 拆分原始字符串，按空格分割为日期、小时两个片段
split_content <- strsplit(df$dteday, " ", fixed = TRUE)
# 提取固定的日期部分
date_str <- sapply(split_content, `[`, 1)
# 提取小时值，格式化为两位带前导零的格式，拼接固定的:00分钟段
hour_str <- sprintf("%02d:00", as.integer(sapply(split_content, `[`, 2)))
# 合并为目标格式覆盖原列
df$dteday <- paste(date_str, hour_str)

运行后得到的输出如下：

dteday
1 01/01/2011 00:00
2 01/01/2011 01:00
3 01/01/2011 02:00
4 01/01/2011 19:00

可计算时间类型转换方案 #

如果后续需要基于这列做时间差计算、时间序列筛选等操作，不建议仅转换为字符串格式，可通过lubridate包直接解析为标准时间类型，再按要求格式化展示：

library(lubridate)
# 按原始字符串结构解析为标准时间类型（原结构为 日/月/年 小时）
df$dteday <- dmy_h(df$dteday)
# 按要求的展示格式转为目标字符串
df$dteday <- format(df$dteday, "%d/%m/%Y %H:%M")

关键说明 #

• sprintf函数中%02d的参数作用：将传入的整数强制格式化为两位字符长度，不足两位时自动在前面补0，正好适配单数字小时转两位显示的需求
• 若仅需字符串展示效果、无后续时间运算需求，优先使用第一种原生R方案，运行效率更高，无额外包加载成本

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