假设我有一个数据框
> col1<-c(1,5,2,6,8,1,3,8,9,1,8)
> col2<-c(1,2,1,1,2,2,1,2,2,1,1)
> df<-data.frame(col1,col2)
> df
col1 col2
1 1 1
2 5 2
3 2 1
4 6 1
5 8 2
6 1 2
7 3 1
8 8 2
9 9 2
10 1 1
11 8 1
我已经用我拥有的数据运行了 Kruskal-Wallis 测试df
> dfKW<-kruskal.test(col1~col2, data=df)
> dfKW
Kruskal-Wallis rank sum test
data: col1 by col2
Kruskal-Wallis chi-squared = 1.695, df = 1, p-value = 0.1929
我想做的是将p值提取到向量中（只有没有标签'p值'的值）。我试过这个：
> dfKWx<-sapply(dfKW, '[', 'p.value')
> dfKWx
statistic.NA parameter.NA p.value method data.name
NA NA NA NA NA
显然，没有运气。
我从谷歌教授那里得到的初步帮助使我达到了上面所描述的观点。
真诚感谢所有帮助。谢谢！
PS。请注意，数据仅用于提供示例。我没有测试正态分布，也不希望对这些数据进行测试。我的原始工作数据没有正常分发，但由于保密因素，我不会使用它 - 或它的一部分 - 作为示例。示例数据的行为类似于我的原始工作数据。