我有一个发行版，例如：
d
#[1] 4 22 15 5 9 5 11 15 21 14 14 23 6 9 17 2 7 10 4
或者，矢量ddput格式。
d <- c(4, 22, 15, 5, 9, 5, 11, 15, 21, 14, 14, 23, 6, 9, 17, 2, 7, 10, 4)
当我应用 ks.test 时，：
gamma <- ks.test(d, "pgamma", shape = 3.178882, scale = 3.526563)
这将给出以下警告：
警告消息： 在 ks.test(d， "pgamma"， shape = 3.178882， scale = 3.526563( 中： 柯尔莫哥罗夫-斯米尔诺夫测试不应出现领带
我尝试unique(d)，但显然我的数据会降低值，我不希望这种情况发生。
而其他的礼仪和例子在网上，这个例子也发生了，但不同的是测试显示一些结果与警告消息，而不仅仅是没有ks.test值的消息。
一些帮助？
在gamma中，您可以找到结果，警告消息没有阻止
d <- c(4, 22, 15, 5, 9, 5, 11, 15, 21, 14, 14, 23, 6, 9, 17, 2, 7, 10, 4)
gamma <- ks.test(d, "pgamma", shape = 3.178882, scale = 3.526563)
警告消息：在 ks.test(d， "pgamma"， shape = 3.178882， scale = 3.526563(：柯尔莫哥罗夫-斯米尔诺夫测试不应存在领带
gamma
One-sample Kolmogorov-Smirnov test
data: d
D = 0.14549, p-value = 0.816
alternative hypothesis: two-sided
您可以在帮助页面中找到警告的说明??ks.test
领带的存在总是会产生警告，因为连续 发行版不会生成它们。如果领带是由四舍五入引起的 这些测试可能是大致有效的，但即使是适度的 舍入会对计算的统计数据产生重大影响。
如您所见，应用了一些舍入，并且测试"大约"有效。