cv_test = function(x,y) {
CV = sqrt(chisq.test(x, y, correct=FALSE)$statistic /
(length(x) * (min(length(unique(x)),length(unique(y))) - 1)))
print.noquote("Cramér V / Phi:")
return(as.numeric(CV))
}
'# Download Files Post > Source' 카테고리의 다른 글
| Java Codes for 조효은, (2013) "초보자를 위한 Java 200제 - Java 프로그래밍 시작을 위한 입문서", 정보문화사 (0) | 2015.06.15 |
|---|---|
| gibbsit for GFortran (0) | 2014.06.06 |
| Goodman and Kruskal Gamma in R (0) | 2014.06.05 |
| 데이터 계급 구분 in R (0) | 2014.06.03 |
| KoreaMap.R (0) | 2014.01.09 |
| Peter Lenk, "Gauss Programs for Bayesian Inference and Markov Chain Monte Carlo", ---. 2001 (0) | 2013.11.02 |
| Rdggev.r (0) | 2013.06.21 |
| eigs.m (0) | 2013.06.21 |
| [MATLAB] R-Link (0) | 2013.02.07 |
| [MATLAB] Shapiro-Wilk Test (0) | 2012.11.10 |