如何用R将日期降水长格式数据转为指定宽格式？

核心问题修正 #

你之前的代码错误在于values_from参数指定了不存在的value列，实际应该对应你的降水量列名precipitation.，同时建议明确指定分组列，避免无关列干扰转换结果。

完整实现步骤 #

1. 加载必要工具包：使用tidyverse集合包，其中包含处理日期的lubridate和处理宽长转换的tidyr

library(tidyverse)

2. 预处理日期列：从date.列提取年、月、日，若date.是字符类型，需先转换为标准日期格式

# 若date.是字符型，先转换为日期格式
df$date. <- ymd(df$date.)

# 提取年、月、日列
df <- df %>%
  mutate(
    year = year(date.),
    month = month(date.),
    day = day(date.)
  )

3. 执行宽格式转换

wide_table <- df %>%
  pivot_wider(
    id_cols = c(year, month),  # 明确指定作为行标识的分组列
    names_from = day,
    values_from = precipitation.,  # 对应实际的降水量列名
    names_prefix = "Day_",
    values_fill = NA  # 填充无对应日期的单元格（如2月30日、4月31日等）
  )

结果说明 #

转换后的wide_table会以year和month的组合作为每行的唯一标识，列名从Day_1到Day_31，每个单元格对应对应年月某日的降水量，不存在的日期会自动填充为NA。

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