flag variable is incorrectly assigned during data restructuring in R

Question

this data with which i work.

datatrain=structure(list(probeg = c(10000L, 20000L, 30000L, 40000L, 50000L, 
60000L, 70000L, 80000L, 90000L, 100000L, 110000L, 120000