r - 如何在一定范围内使用ks.test

Question

如果它们遵循统一，我喜欢测试一系列值。但我不知道如何，例如

x<-runif(1000)
ks.test(x, punif,alternative = "two.sided")

正在工作，但是

x<-runif(1000)
ks.test(x[x<0.5], punif,alternative = "two.sided")

没有给出有意义的结果。如何在 ks.test 中使用 punif 进行正确的测试？

Answer 1

我不确定你认为什么“没有意义”。报告的 p 值实际上是 0。它告诉您限制为 0-0.5 的值不太可能是从 0-1 域上的均匀分布中随机抽取的。对比：

> x<-runif(1000)
> ks.test(x[x<0.5], function(x) {punif(x, 0, 0.5)},alternative = "two.sided")

    One-sample Kolmogorov-Smirnov test

data:  x[x < 0.5]
D = 0.0292, p-value = 0.7837
alternative hypothesis: two-sided