consecutive days with netcdf or raster data in r

Question

I wanna calculate 3 consecutive days above certain threshold (for example 0.95). I made code in blowe to calculate. This code I created does not produce for every year. It o