Sören Nonnengart hat geschrieben: ↑Mo Dez 30, 2019 10:08 pm Wie schmeiße ich denn diejenigen raus, die mehr als 1 jahr arbeitslos waren?
Code: Alles auswählen
library("data.table")
D <- fread(
"I W B L
1 1 0 7
1 2 0 7
1 3 1 5
1 4 0 6
1 5 0 7
2 1 0 9
2 2 1 7
2 3 0 8
2 4 0 8
2 5 0 9
3 1 0 7
3 2 0 7
3 3 1 4
3 4 1 5
3 5 0 6")
D[, if(sum(B==1)==1) .SD, I]