using R - delete rows when a value repeated less than 3 times

Question

frame with 10 rows and 3 columns

    a   b c
1   1 201 1
2   2 202 1
3   3 203 1
4   4 204 1
5   5 205 4
6   6 206 5
7   7 207 4
8   8 208 4
9   9 209 8
10 1         


        

Answer 1

Building on Joshua's answer:

Data[Data$c %in% names(which(table(Data$c) > 2)), ]