У меня есть набор данных со значениями температуры от 1989 до 2018 года, мне нужно найти для каждого года первые 5 дней подряд, в которых WMean_AVG_TEMP составляет> = 5, и последние 5 дней подряд, в которых WMean_AVG_TEMP> = 5. Тогда мне нужно знать продолжительность этого периода (количество дней), весь этот результат должен быть связан с кодом NUTS (ITC11). Я ценю любую помощь. Вот пример моего набора данных.
dput(droplevels(head(data,10)))`
structure(list(NUTS = structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L,
1L, 1L, 1L), .Label = "ITC11", class = "factor"), YEAR = c(1989L,
1989L, 1989L, 1989L, 1989L, 1989L, 1989L, 1989L, 1989L, 1989L
), MONTH = c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L), DAY = 1:10,
WMean_AVG_TEMP = c(4.67658969041876, 3.84797404270322, 0.924227019436549,
1.05457654181946, -1.27516988837113, 0.283175108098705, 2.0813951419463,
3.62100190622789, 1.76970410697158, 1.71812894277136)), .Names = c("NUTS",
"YEAR", "MONTH", "DAY", "WMean_AVG_TEMP"), row.names = c(NA,
10L), class = "data.frame")