我有数据框，并希望以等于200的值的间隔拆分表。我尝试按照以下示例进行操作，但它无法正常工作。请帮忙，因为我需要快速处理它。
TD$wW=(c(0, cumsum(diff(TD$wZ) == 200)))
1 200 1
2 452 1
3 54 1
4 0 1
5 200 2
6 123 2
7 0 2
8 200 3
9 466 3
10 1223 3
11 4522 3
12 10665 3
13 30425 3
14 57730 3
15 139565 3
16 403784 3
17 200 3
18 28 3
19 0 3