R语言如何替换data.frame指定日期范围（2001年）内的Flow列数值

实现方案 #

你可以选择以下任意一种方法完成替换：

方法1：基于已加载的tidyverse+lubridate实现

用year()提取日期对应的年份，匹配2001年的行直接替换Flow值，写法简洁符合tidyverse语法习惯：

DF <- DF %>%
  mutate(Flow = replace(Flow, year(Date) == 2001, -1))

方法2：Base R原生实现（无需加载额外依赖包）

用format()提取日期的年份字段做匹配，直接对目标行赋值：

DF$Flow[format(DF$Date, "%Y") == "2001"] <- -1

你可以运行以下代码验证替换结果：

# 查看2001年的行替换结果
head(DF[year(DF$Date) == 2001, ])
# 查看非2001年的行是否保留原值
head(DF[year(DF$Date) == 2002, ])

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