如何获得变量水平的比例？

Question

c1 <- rep(1,47)
c2 <- rep(0,53)
c <- c(c1,c2)
cweight <- c(1:100)

我想知道使用权重的c中1和0的比例。当我使用wtd.table命令时，我得到频率。我想要分数或更高的百分比。

install.packages("weights")
library(weights)
wtd.table(c,weight=cweight)

这是我得到的输出。

wtd.table(c,weight=cweight)
  0    1 
3922 1128 

我想要百分比。虽然它看起来像关于变量的非常简单的信息，但我没有简单的方法来做到这一点。

Answer 1

为什么不简单地做：

x <- wtd.table(c,weight=cweight)
x / sum(x)

此外，我似乎不需要使用wtd.table()。这样做：

x <- table(c)
x / sum(x)