Mann–Whitney U test R语言检验

 

001、

set.seed(123)


group_A <- rnorm(30, mean = 5, sd = 1)  # 药物A的效果
group_B <- rnorm(30, mean = 6, sd = 1)  # 药物B的效果

u_test_result <- wilcox.test(group_A, group_B, alternative = "two.sided")

print(u_test_result)

。