按频率绘制因子

Question

我有一个因素a：

> a
[1]  foo                                                    
[2]  bar                      
[3]  foo                                
[4]  baz                                                     
[5]  bar
[6]  foo

我想plot()这个因素，但只包括最低频率为2的级别。所以只绘制了foo和bar，而不是baz。

我怎么能做到这一点？

Answer 1

您只需使用标准子集。首先，创建一些表：

d = factor(sample(LETTERS, 50, replace=TRUE))

接下来，创建一个频率表：

freq_tab = table(d)

最后，子集和情节：

barplot(freq_tab[freq_tab>=2])

Answer 2

另一个解决方案是将函数summary与as.factor结合使用：

summary(as.factor(a)) -> b
barplot(b[b>=2])