我使用anesrakeandweights包在我的调查中创建了加权数据。但是,除了包中的功能之外,我不确定之后如何使用权重wpct。我如何计算描述性统计数据并将加权数据与其他功能/包集成?
包中可重现的数据anesrake:
data("anes04")
anes04$caseid <- 1:length(anes04$age)
anes04$agecats <- cut(anes04$age, c(0, 25,35,45,55,65,99))
levels(anes04$agecats) <- c("age1824", "age2534", "age3544",
"age4554", "age5564", "age6599")
marriedtarget <- c(.4, .6)
agetarg <- c(.10, .15, .17, .23, .22, .13)
names(agetarg) <- c("age1824", "age2534", "age3544",
"age4554", "age5564", "age6599")
targets <- list(marriedtarget, agetarg)
names(targets) <- c("married", "agecats")
outsave <- anesrake(targets, anes04, caseid=anes04$caseid,
verbose=TRUE)
caseweights <- data.frame(cases=outsave$caseid, weights=outsave$weightvec)
这将为我提供一个带有数据框权重的新向量。所以,我的问题是,我怎样才能知道分析数据?如何将这些权重与汇总统计数据结合起来?