Я бы хотел подсчитать, сколько дней в каждом сезоне приходится на продолжительность даты начала и окончания.Категории сезона: декабрь / 1 февраля / 28 (зима), март / 1-май / 31 (весна), июнь / 1-август / 31 (лето) и сентябрь / 1-ноябрь / 30 (осень).
df1 <- data.frame(
ID=c(1,1,1,1,2,2,2,2) ,
Date=as.Date(c("2011/1/1","2011/4/1","2012/3/4","2012/9/8",
"2013/1/4","2013/2/1"," 2013/6/1"," 2015/3/1")))
df1 %>%
group_by(ID) %>%
mutate(diff = max(Date) - min(Date))
Например, идентификатор 1 имеет 616 дней.Я хотел бы знать, сколько дней в каждом сезоне.
С 2011/1 / - 2012/9/8, у идентификатора 1 есть 616 дней, я хотел бы узнать, сколько дней зима, весна, лето, соответственно, осень.
Как зима (150 дней) весна (150 дней) лето (150 дней) осень (166 дней).