Tengo una lista de 106 tibbles y quiero obtener de cada uno de esos tibbles un índice que cumpla por tercera vez vonsecutiva una condición, sin embargo obtengo el índice en cada tibble dónde se cumple la condición por tercera vez en total.
idx8 = data_sensor %>% map_dbl(~min(which(cumsum(.x[["Temperature"]] < 8.0) == 3)))
Con el siguiente código, he logrado identificar aquellos índices que cumplen el requisito, teniendo en cuenta que en mi tibble, el primer valor siempre está por debajo de 8.0. Para todos los demás casos no funciona.
idx8 = data_sensor %>% map_dbl(~min(which(cumsum(.x[["Temperature"]] < 8.0) == 3)))
idx84 = data_sensor %>% map_dbl(~min(which(cumsum(.x[["Temperature"]] < 8.0) == 4)))
idx83 = idx84-idx8
Para todo id83 = 1 se habrá cumplido la condición
> idx83
[1] 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1
[23] 1 1 1 1 1 1 1 1 1 NaN 1 1 1 1 1 NaN 1 1 1 1 1 1
[45] 1 1 12 NaN 1 1 1 1 1 1 1 1 NaN 1 1 1 1 1 1 1 1 1
[67] 1 1 1 1 1 1 1 1 1 NaN 1 1 1 4 3 1 1 1 1 1 1 NaN
[89] 1 1 1 1 1 1 1 1 NaN 1 1 Inf 1 1 1 1 1 1
¿Cómo puedo encontrar el índice para cuando se cumple la condición por tercera vez seguida?