불균형 반복 측정 데이터를 분석하도록 설정했으며, 대부분의 통계 패키지가 ANOVA (즉, 유형 III 제곱합)로이를 처리하는 방식이 잘못되었음을 읽었습니다. 따라서 혼합 효과 모델을 사용하여 이러한 데이터를 분석하고 싶습니다. 에서 혼합 모델에 대해 많이 읽었 R
지만 여전히 R
혼합 효과 모델에 익숙하지 않고 제대로 작동하고 있다고 확신하지 못합니다. 아직 "전통적인"방법으로 이혼 할 수는 없지만 여전히 과 사후 테스트 가 필요 합니다.
다음 접근법이 의미가 있는지 또는 끔찍한 일을하고 있는지 알고 싶습니다. 내 코드는 다음과 같습니다.
# load packages
library(lme4)
library(languageR)
library(LMERConvenienceFunctions)
library(coda)
library(pbkrtest)
# import data
my.data <- read.csv("data.csv")
# create separate data frames for each DV & remove NAs
region.data <- na.omit(data.frame(time=my.data$time, subject=my.data$subject, dv=my.data$dv1))
# output summary of data
data.summary <- summary(region.data)
# fit model
# "time" is a factor with three levels ("t1", "t2", "t3")
region.lmer <- lmer(dv ~ time + (1|subject), data=region.data)
# check model assumptions
mcp.fnc(region.lmer)
# remove outliers (over 2.5 standard deviations)
rm.outliers <- romr.fnc(region.lmer, region.data, trim=2.5)
region.data <- rm.outliers$data
region.lmer <- update(region.lmer)
# re-check model assumptions
mcp.fnc(region.lmer)
# compare model to null model
region.lmer.null <- lmer(dv ~ 1 + (1|subject), data=region.data)
region.krtest <- KRmodcomp(region.lmer, region.lmer.null)
# output lmer summary
region.lmer.summary <- summary(region.lmer)
# run post hoc tests
t1.pvals <- pvals.fnc(region.lmer, ndigits=10, withMCMC=TRUE)
region.lmer <- lmer(dv ~ relevel(time,ref="t2") + (1|subject), data=region.data)
t2.pvals <- pvals.fnc(region.lmer, ndigits=10, withMCMC=TRUE)
region.lmer <- lmer(dv ~ relevel(time,ref="t3") + (1|subject), data=region.data)
t3.pvals <- pvals.fnc(region.lmer, ndigits=10, withMCMC=TRUE)
# Get mcmc mean and 50/95% HPD confidence intervals for graphs
# repeated three times and stored in a matrix (not shown here for brevity)
as.numeric(t1.pvals$fixed$MCMCmean)
as.numeric(t1.pvals$fixed$HPD95lower)
as.numeric(t1.pvals$fixed$HPD95upper)
HPDinterval(as.mcmc(t1.pvals$mcmc),prob=0.5)
HPDinterval(as.mcmc(t1.pvals$mcmc),prob=0.5)
내가 가진 몇 가지 구체적인 질문 :
- 혼합 효과 모델을 분석하는 올바른 방법입니까? 그렇지 않다면 대신 무엇을해야합니까?
- mcp.fnc의 출력 비평 도표가 모델 가정을 검증하기에 충분합니까, 아니면 추가 단계를 수행해야합니까?
- 혼합 모델이 유효하려면 데이터가 정규성과 동성애에 대한 가정이 필요하다는 것을 알았습니다. mcp.fnc에 의해 생성 된 비평 도표를 살펴보면 "정상적으로 정상적인"것이 무엇인지 아닌지를 어떻게 판단합니까? 나는 이것에 대한 느낌을 얻을 필요가 있습니까, 아니면 그들의 일을하는 처방 된 방법입니까? 이러한 가정과 관련하여 혼합 모형이 얼마나 강력합니까?
- 샘플에서 대상의 ~ 20 특성 (바이오 마커)에 대해 세 시점 사이의 차이를 평가해야합니다. 내가 수행 한 모든 테스트를보고하거나 (중요하지 않은지), 여러 비교를 위해 어떤 형태의 수정이 필요한가?
실험과 관련하여 좀 더 정확하게하기 위해 몇 가지 세부 사항이 있습니다. 우리는 치료를 받았을 때 많은 참가자들을 세로로 따라 갔다. 치료 시작 전과 후 2 시점에 여러 바이오 마커를 측정했습니다. 내가보고 싶은 것은 세 시점 사이에 이러한 바이오 마커에 차이가 있는지 여부입니다.
나는이 튜토리얼 에서 내가하고있는 일의 대부분을 기초로하고 있지만, 나의 필요와 내가 읽은 것에 따라 약간의 변화를 주었다. 내가 변경 한 내용은 다음과 같습니다.
- pvals.fnc와 t1-t2, t2-t3 및 t1-t3 비교를 얻기 위해 "time"요소의 레벨을 재조정하십시오 (languageR 패키지에서)
- 가능성 비율 테스트 대신 Kenward-Roger의 접근 방식 (pbkrtest 패키지 사용)을 기반으로 근사 F- 검정을 사용하여 혼합 모델을 null 모델과 비교
- LMERConvenienceFunctions 패키지를 사용하여 가정을 확인하고 특이 치를 제거하십시오 (혼합 모델이 특이 치에 매우 민감하다는 것을 읽었 기 때문에)