按“ID”列，若某一值出现次数小于3，则该值对应的行全部删除
（如ID=2，出现1次，不满足条件，该行删除；ID=1出现3次，满足条件，所有行保留）

R语言，应该用什么函数？怎么编呢？

数据如下：
F1        Poi        X1        X30        ID
S2        1        35        190        1
S5        4        35        190        1
S2        1        35        190        1
S5        4        35        190        2
S2        1        35        190        3
S5        4        35        190        3
S2        1        35        190        3
S5        4        35        190        4
S2        1        35        190        5
S5        4        35        190        5
S2        1        35        190        5
S5        4        35        190        7
S2        1        35        190        7
S5        4        35        190        7