Как получить пропорции уровней переменной?

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)