R语言中使用subset()和while取子集，你会发现子集的因子水平数没有改变。那么问题来了，对子集用table()怎么才能去掉未使用的因子？...