How to perform fill operation by group in R

Question

So I am trying to add a column trip to the dataframe using a logic. The logic is that if a variable value is 1, it means a trip has started and when the variabl