shift = c(1,1,1,1,1,1,1,1,2,2,2,2,2,2,2,2,2,2,3,3,3,3,3,3,3)
count =c(1,2,3,4,5,6,7,8,1,2,3,4,5,6,7,8,9,10,1,2,3,4,5,6,7)
test <- cbind(shift,count) 因此,我尝试为每个班次标记每一行(因此,使用count = c(8,10,7)的行用二进制1标记,每隔一行用0标记。现在我在想,使用左连接也许是可能的,但我不是很确定。我不喜欢使用循环,而是使用dplyr中的一些技术。谢谢你们!