我有一个id和速度的数据集.
id <- c(1,1,1,1,2,2,2,2,3,3,3)
speed <- c(40,30,50,40,45,50,30,55,50,50,60)
i <- cbind(id, speed)
limit <- 35
Run Code Online (Sandbox Code Playgroud)
比如,如果'速度'越过'限制'将其计为1.只有当速度低于并超过'限制'时,您才会再次计算.
我希望数据像.
id | Speed Viol.
----------
1 | 2
---------
2 | 2
---------
3 | 1
---------
Run Code Online (Sandbox Code Playgroud)
这里是id(count).
id1 (1) 40 (2) 50,40
id2 (1) 45,50 (2) 55
id3 (1) 50,50,60
Run Code Online (Sandbox Code Playgroud)
如何做到不使用if().