Calculating binary values every second in timeseries dataset in r

Question

I have this table of time and binary values,

I want to check after a second wether the value in binary column is 1 or 0, and then create new column of the new