Displaying 2 results from an estimated 2 matches for "pkendall".
Did you mean:
kendall
2005 Aug 18
2
kendall tau correlation test for ties: Potential error (PR#8076)
...STATISTIC <- c(T = NA)
PVAL <- NA
}
else {
if(is.null(exact))
exact <- (n < 50)
if(exact && !TIES) {
q <- round((r + 1) * n * (n - 1) / 4)
pkendall <- function(q, n) {
.C("pkendall",
length(q),
p = as.double(q),
as.integer(n),
PACKAGE = "stats")$p
}
PV...
2006 May 24
0
the computation of exact p-value for the nonparametric cor-test with ties
...Gx is null when x variable is without ties
Gy<-table(yr)
Gy<-Gy[Gy>1]
Gy<-sum(Gy^2-Gy)
Gy is null when y variable is without ties
q <- round((r + 1)*sqrt(n^2-n-Gx)*sqrt(n^2-n-Gy)/4)
pkendall <- function(q, n) {
.C("pkendall",
length(q),
p = as.double(q),
as.integer(n),
PACKAGE = "stats")$p
}
PV...