我正在尝试根据数据集中变量值的不同组合的数量为分析创建权重。我尝试使用distinct()andcount()函数，但是行的顺序被打乱了（与 using 相同rle()。下面的函数以正确的顺序准确地计算权重，但效率不高。有没有办法让它更快？谢谢！
weights<-function(v){
sum(X==v)
}
w<-sapply(unique(X, weights)
问问题
118 次
我正在尝试根据数据集中变量值的不同组合的数量为分析创建权重。我尝试使用distinct()andcount()函数，但是行的顺序被打乱了（与 using 相同rle()。下面的函数以正确的顺序准确地计算权重，但效率不高。有没有办法让它更快？谢谢！
weights<-function(v){
sum(X==v)
}
w<-sapply(unique(X, weights)