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

Question

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

我想知道 1 和 0 在 c 中使用权重的比例。当我使用 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)