绘制前n个值，将剩余部分设为“其他”

Question

我想绘制一个20,000条记录的数据框，每条记录来自一个国家，例如：

df$Country:

Australia  
Australia  
Australia  
Uganda  
Peru  
Peru

但是如果我将它们全部绘制起来是不可读的，请参阅：http://rpubs.com/onco_p53/country 我想绘制十大最频繁的国家，并将其余国家分为“其他国家”类别。理想情况下使用ggplot2 geom_bar