Displaying 1 result from an estimated 1 matches for "ppccpoi".
Did you mean:
ppccpois
2008 Sep 15
0
how to calculate PPCC?
...here other
ways to estimate the correlation coefficient?
/PPCCNORM <- function(x,mean,sd) {
x <- sort(x)
pp <- ppoints(x)
cor(qnorm(pp,mean=mean,sd=sd),x)
}
PPCCLOG <- function(x,mean,sd) {
x <- sort(x)
pp <- ppoints(x)
cor(qlnorm(pp,meanlog=mean,sdlog=sd),x)
}
PPCCPOIS <- function(x,lambda) {
x <- sort(x)
pp <- ppoints(x)
cor(qpois(pp,lambda=lambda),x)
}
PPCCEXP <- function(x,rate) {
x <- sort(x)
pp <- ppoints(x)
cor(qexp(pp,rate=rate),x)
}/
Thanks in advanced,
[[alternative HTML version deleted]]