带权重的配对符号测试

Question

在 R 中，我使用

survey

包对配对数据进行这些测试：

• 加权 Wilcoxon 符号秩检验
• 加权符号测试

然而，我正在努力做它们。

通过定义设计然后使用函数

signed_rank<-function (x) {sign(x) * rank(abs(x))}
summary (svyglm(signed_rank(variable) ~ 1, mydesign)) 

我已经能够进行非配对的 wilcoxon。

但是我一直无法进行配对版本以及Sign测试。有什么想法吗？

谢谢