子集在不同年份的同一时间段内

Question

我有一些时间数据，包括几年（没有连续），我想选择每年相同的时间间隔。例如，我使用此代码选择一年的时间段，如何才能提高效率并在剩余的时间内完成？

library(lubridate)
date1 <- as.POSIXct("2004-07-01")
date2 <- as.POSIXct("2004-09-30")
inter<-interval(date1,date2)
subdf<-df[df$time %within% inter,]

Answer 1

正如您提到的lubridate包，这对您有用：

subdf <- df[month(df$time) %in% c(7,8,9), ]