Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/api/5.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 组间比较Mann-Whitney检验_R_Dplyr_Data.table - Fatal编程技术网

R 组间比较Mann-Whitney检验

R 组间比较Mann-Whitney检验,r,dplyr,data.table,R,Dplyr,Data.table,在我的数据集中,我有以下列: 组哪个是分组变量 var哪个是范围变量 我只需要比较1-2组和1-3组。 如何使用wilcox.test进行测试? 这里是数据 mydat=structure(list(group = c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 3L, 3L, 3L, 3L), var = c(23L, 24L, 24L, 23L, 23L, 24L, 24L, 23L, 23L, 24L, 24L, 23L)), .Names = c("group",

在我的数据集中,我有以下列:

哪个是分组变量
var哪个是范围变量

我只需要比较1-2组和1-3组。 如何使用wilcox.test进行测试?
这里是数据

mydat=structure(list(group = c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L, 3L, 
3L, 3L, 3L), var = c(23L, 24L, 24L, 23L, 23L, 24L, 24L, 23L, 
23L, 24L, 24L, 23L)), .Names = c("group", "var"), class = "data.frame", row.names = c(NA, 
-12L))

您可以通过
group
对数据进行
split
frame,然后
lappy
对所需的组对进行测试

lst <- split(mydat, mydat$group)
lapply(lst[-1], function(DF) wilcox.test(DF$var, lst[[1]]$var, exact = FALSE))

lst您可以
split
data.frame按
group
进行分组,然后
lappy
对所需的组对进行测试

lst <- split(mydat, mydat$group)
lapply(lst[-1], function(DF) wilcox.test(DF$var, lst[[1]]$var, exact = FALSE))

lst您也可以尝试一种可视化解决方案

library(tidyverse)
library(ggsignif)
ggplot(mydat, aes(factor(group), var)) + 
    geom_boxplot() + 
    geom_signif(comparisons = list(c(1,3), c(1,2)), test = "wilcox.test", 
                test.args = list(exact = FALSE),step_increase = 0.1)

您也可以尝试视觉解决方案

library(tidyverse)
library(ggsignif)
ggplot(mydat, aes(factor(group), var)) + 
    geom_boxplot() + 
    geom_signif(comparisons = list(c(1,3), c(1,2)), test = "wilcox.test", 
                test.args = list(exact = FALSE),step_increase = 0.1)

很抱歉,但也许你能在这篇相关的文章中帮助我?对不起,也许你能帮我写这篇相关的文章?