search for: s_csmh

Displaying 2 results from an estimated 2 matches for "s_csmh".

Did you mean: y_csmh
2005 Apr 07
2
about mantelhaen.test (PR#7779)
...0) %x% t(1:J) A_CSMH <- t(1:I) %x% t(1:J) Y_GMH <- matrix(0, nc = 1, nr = df_GMH) Y_SMH <- matrix(0, nc = 1, nr = df_SMH) Y_CSMH <- matrix(0, nc = 1, nr = df_CSMH) S_GMH <- matrix(0, nc = df_GMH, nr = df_GMH) S_SMH <- matrix(0, nc = df_SMH, nr = df_SMH) S_CSMH <- matrix(0, nc = df_CSMH, nr = df_CSMH) for(k in 1:K) { V <- NULL f <- x[, , k] ntot <- sum(f) p_ip <- apply(f, 1, sum) / ntot p_pj <- apply(f, 2, sum) / ntot m <- p_ip %x% p_pj * ntot V <- ntot^2 * ((diag(p_ip) -...
2006 Oct 31
0
about mantelhaen.test (PR#7779)
...ow_scores) %x% t(col_scores) Y_GMH <- matrix(0, nc =3D 1, nr =3D df_GMH) Y_SMH <- matrix(0, nc =3D 1, nr =3D df_SMH) Y_CSMH <- matrix(0, nc =3D 1, nr =3D df_CSMH) S_GMH <- matrix(0, nc =3D df_GMH, nr =3D df_GMH) S_SMH <- matrix(0, nc =3D df_SMH, nr =3D df_SMH) S_CSMH <- matrix(0, nc =3D df_CSMH, nr =3D df_CSMH) for(k in 1:K) { V <- NULL f <- x[, , k] ntot <- sum(f) p_ip <- apply(f, 1, sum) / ntot p_pj <- apply(f, 2, sum) / ntot m <- p_ip %x% p_pj * ntot V <- ntot^2 * ((diag(p_ip...