모델 업데이트하기
현재 WAIS-III 모델에서는 지각적 조직(perceptual organization)과 처리 속도(processing speed) 사이에서 Heywood 사례가 나타났어요. 상관이 매우 높은 잠재변수들은 하나의 잠재변수로 합치는 것이 좋습니다. perceptorg와 processing 잠재변수의 관측변수를 결합한 performance 변수를 만들어 주세요.
데이터는 이미 불러와져 있으며 이름은 IQdata입니다. head(IQdata)로 데이터를 확인할 수 있어요.
이 연습은 강의의 일부입니다
R에서 lavaan으로 배우는 구조방정식모형
연습 안내
- 네 요인 모델을 수정하여
piccomp,block,matrixreason,digsym,symbolsearch로 측정되는performance변수를 포함하세요. cfa()함수를 사용해 모델을 분석하고 새로운 오류가 있는지 확인하세요.- 표준화 해(solution)와 적합도 지수를 포함해 모델을 요약하여 모형 적합도를 판단하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Edit the original model
wais.model <- 'verbalcomp =~ vocab + simil + inform + compreh
workingmemory =~ arith + digspan + lnseq
perceptorg =~ piccomp + block + matrixreason
processing =~ digsym + symbolsearch'
# Analyze the model and include the model and data argument
wais.fit <- cfa(___)
# Summarize the model
summary(___)