> x=runif(10)
> x
[1] 0.2101116 0.5110072 0.4349526 0.7644758 0.3116956 0.9007834 0.5795675
[8] 0.4619352 0.1669535 0.2296814
> shapiro.test(x)

        Shapiro-Wilk normality test

data:  x
W = 0.9388, p-value = 0.5401

各位R友，有谁知道如何提取检验中的p值？谢谢