R 频率表（修改代码）

我使用下面的代码计算频率表，只保留百分比值大于0.1的级别。但我还是想根据数据集中的所有观察结果显示它们的百分比。如何修改下面的代码以显示基于所有观察的特定级别的百分比

   library(ggplot2)
    library(rattle)
    library(plyr)
    levels <- names(which(summary(States$region)/sum(summary(States$region)) >0.1))
    table_ <- ggplot(States, aes(region ,fill=region))
    table_ <- table_ + geom_bar() 
    table_ <- table_ + theme(legend.position="none")
    table_ <- table_ + coord_flip()  
    table_ <- table_ + geom_text(aes(y = (..count..),label = ifelse((..count..)==0,"",scales::percent((..count..)/sum(..count..)))), stat="count",colour="black",vjust=1.0,size=4)+
                            scale_x_discrete(limit = levels)

库（ggplot2）
图书馆（嘎嘎声）
图书馆（plyr）
级别（0.1））
表uu你能用一个例子来澄清你的问题吗？steveb，百分比=总和（MTN）/数据集中的所有观察值，而不仅仅是选定的水平。撇开你将乘以100得到百分比，我确实理解你如何计算结果的部分。不清楚的是，您有一个基于所有观测值的频率表，您只是在绘制
0.1
上的频率表。你能说明你想要的输出应该是什么样子吗？我认为，一旦回答了这个问题，就很容易为你指出正确的方向。