мои данные имеют столбцы: название группы, дата, значение. Я хочу создать столбец, который, если все значения для каждого дня превышают предел 10 для последовательных 2 дней, для каждой отдельной группы. В одном столбце будет показано отклонение счетчика, если все значения для каждого дня превысят лимит (больше или равен 10) для последовательных дней, а затем инвертируйте счетчик counter<- counter+1, второй столбец, если все значения для каждого дня превысят лимит (больше или равен 10) для последовательных 2 дни, затем отметьте истину.
set.seed(1)
Data <- data.frame(
Group = c(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2),
Date= c("01-03-2020 01:00", "01-03-2020 02:00","01-03-2020 03:00","01-03-2020 04:00","02-03-2020 01:00","02-03-2020 02:00",
"02-03-2020 03:00","03-03-2020 01:00","03-03-2020 02:00","03-03-2020 03:00","01-03-2020 01:00","01-03-2020 02:00",
"01-03-2020 03:00","01-03-2020 04:00","02-03-2020 01:00","02-03-2020 02:00","02-03-2020 03:00","03-03-2020 01:00",
"03-03-2020 02:00","03-03-2020 03:00" ),
value=c(10, 3, 11, 12, 14, 10, 12, 10.5, 13, 16, 10, 12, 11, 12, 14, 10, 12, 9, 13, 16)
)
Вывод :: Группа
Date value conday Advisory
1 01-03-2020 01:00 10.0 0 FALSE
1 01-03-2020 02:00 3.0 0 FALSE
1 01-03-2020 03:00 11.0 0 FALSE
1 01-03-2020 04:00 12.0 0 FALSE
1 02-03-2020 01:00 14.0 1 FALSE
1 02-03-2020 02:00 10.0 1 FALSE
1 02-03-2020 03:00 12.0 1 FALSE
1 03-03-2020 01:00 10.5 2 TRUE
1 03-03-2020 02:00 13.0 2 TRUE
1 03-03-2020 03:00 16.0 2 TRUE
2 01-03-2020 01:00 10.0 1 FALSE
2 01-03-2020 02:00 12.0 1 FALSE
2 01-03-2020 03:00 11.0 1 FALSE
2 01-03-2020 04:00 12.0 1 FALSE
2 02-03-2020 01:00 14.0 2 TRUE
2 02-03-2020 02:00 10.0 2 TRUE
2 02-03-2020 03:00 12.0 2 TRUE
2 03-03-2020 01:00 9.0 0 FALSE
2 03-03-2020 02:00 13.0 0 FALSE
2 03-03-2020 03:00 16.0 0 FALSE