2016-11-18 15 views

답변

0

불행히도, 대비가 mcp2atm 기능에서 하드 코딩 된 것처럼 보입니다. 이 기능의 일부를 발췌 한 것입니다 (명령 프롬프트에서 mcp2atm을 입력하여 볼 수 있습니다 : dump() 외부 파일 기능).

... 
temp <- con2way(J, K) 
conA <- temp$conA 
conB <- temp$conB 
conAB <- temp$conAB 
if (!op) { ## note: op is hardcoded to FALSE earlier in the function 
    Factor.A <- lincon1(x, con = conA, tr = tr, alpha = alpha) 
    Factor.B <- lincon1(x, con = conB, tr = tr, alpha = alpha) 
    Factor.AB <- lincon1(x, con = conAB, tr = tr, alpha = alpha) 
} 
## ... stuff for generating contrast names ... 
contrasts <- as.data.frame(cbind(conA, conB, conAB)) 
colnames(contrasts) <- c(dnamesA, dnamesB, dnamesAB) 
rownames(contrasts) <- colnames(dataWide) 
... 

con2waylincon1WRS2 기능 (당신이 WRS2::con2wayWRS2:::lincon1를 사용하여 볼 수 있습니다) 내부 있습니다. (소스 코드를 실제로 파고 싶다면 소스 패키지를 다운로드하고 압축을 풀면 유용 할 것입니다.)

사용자 정의 대조를 수행하려면 유지 관리자 WRS2 (maintainer("WRS2") 또는 아마도 issues tracker on R-forge을 시도하십시오 ...) 다른 강력한 통계 장치 (robust stats task view 참조)가 대체 경로를 제공하는지 여부를 알지 못합니다.