比较R中不同数据帧中的行的非参数测试

这是我在这里的第一篇文章

我有4个数据帧，我想对每一行进行逐步非参数测试

我想将数据框A中每一行的值与数据框B中每一行的值进行比较

我需要一个非参数测试，比如Wilcoxon或其他什么

我想用中位数做一个新的列，但我确信还有更好的

你能告诉我怎么做吗

提前谢谢你

编辑： 这是我想象的数据帧。

我想逐行比较每个数据帧，例如对数据帧a和B中的John进行非参数测试，然后对Dora进行非参数测试，等等

---

A我想您正在寻找函数
wilcox.test
（在
stats
包中）

解决方案1：对循环使用

将A的每一行与B的对应行进行比较（并提取p值）的一种方法是为循环

创建一个

，如下所示：

pval=NULL
适用于（i/1:nrow（A））
{
向量a=as.numeric（a[i，2:ncol（a）]）
向量b=as.numeric（b[b$b==A$A[i]，2:ncol（b）]）
p%pivot\u更长（，-A，name\u to=“var”，values\u to=“values”）%>%
变异（组=gsub（“\\d”，“变量”）
#A tibble:24 x 4
var值组
1约翰A1 8 A
约翰2 A2 9 A
3约翰B1 1 B
4约翰B2 3 B
5约翰B3 4 B
6约翰B4 6 B
7朵拉A1 1 A
8朵拉A2 1 A
9多拉B1 1 B
10朵拉B2 2 B
#…还有14行

最后，我们可以按
A
进行分组，并总结数据帧，以获得函数
wilcox.test的p值，在比较各组中每个名称的值时：

DF%>%pivot\u更长（，-A，names\u to=“var”，values\u to=“values”）%>%
突变（组=gsub（“\\d”，”，var））%>%
组别(A)%>%
总结（Pval=wilcox.test（值~组）$p.value）
#一个tibble:4x2
Pval
1朵拉0.219
吉姆1
3约翰0.133
4罗伯特0.584

它看起来更长（特别是因为我解释了每个步骤），但在最后，您可以看到我们需要的行数比第一个解决方案少

它回答了您的问题吗？
我想您正在寻找函数
wilcox.test
（在
stats
包中）

解决方案1：对循环使用

将A的每一行与B的对应行进行比较（并提取p值）的一种方法是为循环
创建一个
，如下所示：

pval=NULL
适用于（i/1:nrow（A））
{
向量a=as.numeric（a[i，2:ncol（a）]）
向量b=as.numeric（b[b$b==A$A[i]，2:ncol（b）]）
p%pivot\u更长（，-A，name\u to=“var”，values\u to=“values”）%>%
变异（组=gsub（“\\d”，“变量”）
#A tibble:24 x 4
var值组
1约翰A1 8 A
约翰2 A2 9 A
3约翰B1 1 B
4约翰B2 3 B
5约翰B3 4 B
6约翰B4 6 B
7朵拉A1 1 A
8朵拉A2 1 A
9多拉B1 1 B
10朵拉B2 2 B
#…还有14行

最后，我们可以按
A
进行分组，并总结数据帧，以获得函数
wilcox.test的p值，在比较各组中每个名称的值时：

DF%>%pivot\u更长（，-A，names\u to=“var”，values\u to=“values”）%>%
突变（组=gsub（“\\d”，”，var））%>%
组别(A)%>%
总结（Pval=wilcox.test（值~组）$p.value）
#一个tibble:4x2
Pval
1朵拉0.219
吉姆1
3约翰0.133
4罗伯特0.584

它看起来更长（特别是因为我解释了每个步骤），但在最后，您可以看到我们需要的行数比第一个解决方案少

它回答了您的问题吗？
欢迎使用SO！您可以提供一个纯文本的数据示例，而不是粘贴数据的图像吗？这将使人们更容易复制/粘贴数据。请参阅：感谢您添加虚构的数据框。我编辑了我的答案以使用这些数据框。欢迎使用SO！您可以不粘贴数据的图像吗提供一个纯文本数据的示例？这将使人们更容易复制/粘贴它。请参阅：感谢您添加虚构的数据帧。我编辑了我的答案以使用这些数据帧。很高兴这能回答您的问题！由于您是新撰稿人，请选中此项：很高兴这能回答您的问题！由于您是新撰稿人，请选中此项s: