FACTOR モデル文を用いると、探索的もしくは確証的一次因子分析による因子 負荷量や独自性分散を求めることができる。
1. Thurstone データの LINEQS モデル文による SEM プログラムの例 |
2. Thurstone データの RAM モデル文による SEM プログラムの例 |
パス図の例2
つぎの例は、SAS/Stat Software (1997, p.164) の McDonald (1985) が引用した Thurstone データの 階層的確証(認)的二次因子分析 (hierarchical second-order confirmatory factor analysis) モデルのパス図である。
この図で、facf1、facf2、facf3 は一次的因子で、facf1 は観測変数 senten (sentence 文章)、vocabu(vocabulary 語彙)、sencom(sentence completion 文章完成)に負荷を、facf2 は観測変数 firlet(first letters 第1文字)、 fourlw(four-letter words 4文字語)、suffic(suffices 接尾辞)に負荷を、 facf3 は観測変数 letser(letter series 文字列)、pedigr(pedigrees 語源)、 letgro(letter grouping 文字のグルーピング)に負荷を、それぞれ持つと仮定さ れている。また、facs は二次的因子で、うえの3つの一次的因子に負荷を持つと 仮定されている。
Thurstone データについての lineqs 文による CALIS プログラムを示 すと、つぎのようになる。このプログラムは、SAS/STAT Software (1997, pp.164-165) を、図5.2の図にあわせて修正したものである:
*------------------------------------------------------------------------- * * A sas program for applying a CALIS analysis to a correlation matrix of * Thurstone reported by McDonald (1985). This program is a modified * version of the program appeared in SAS/STAT Software (1997, p.164). * *------------------------------------------------------------------------; data thurst(type=corr); title 'Example of Thurstone''s data reported by McDonald (1985)'; _type_ ='corr'; input _name_ $ senten vocabu sencom firlet fourlw suffic letser pedigr letgro; cards; senten 1. . . . . . . . . vocabu .828 1. . . . . . . . sencom .776 .779 1. . . . . . . firlet .439 .493 .460 1. . . . . . fourlw .432 .464 .425 .674 1. . . . . suffic .447 .489 .443 .590 .541 1. . . . letser .447 .432 .401 .381 .402 .288 1. . . pedigr .541 .537 .534 .350 .367 .320 .555 1. . letgro .380 .358 .359 .424 .446 .325 .598 .452 1. ; proc calis data=thurst method=max edf=212 pestim se; title2 'second-order confirmatory FA by LINEQS'; lineqs senten= beta1 facf1 + e1, vocabu= beta2 facf1 + e2, sencom= beta3 facf1 + e3, firlet= beta4 facf2 + e4, fourlw= beta5 facf2 + e5, suffic= beta6 facf2 + e6, letser= beta7 facf3 + e7, pedigr= beta8 facf3 + e8, letgro= beta9 facf3 + e9, facf1 = alph1 facs + d1, facf2 = alph2 facs + d2, facf3 = alph3 facs + d3; std facs = 1., e1-e9 = u11-u19, d1-d3 = 3 * 1.; bounds 0. <= u11-u19; run; |
ここで、プログラムの最後の方の bounds 文 は、各観測変数の分散をゼロ以上とする制約を指定するもので、MATRIX 文、LINEQS 文、STD 文、COV 文、 RAM 文などで用いることができる。記号 <= 、< 、 >= 、> 、 = は、それぞれ SAS 記号 LE (less than or equal to)、 LT (less than)、GE (greater than or equal to)、GT (greater than)、EQ (equal) でもよい。とりわけ、> または < を用いる場合、ゼロの代わりに 1e-8 (0.00000001) を用いる必要がある。
sem-Thurstone-lineqs.sas |
つぎに、Thurstone データの RAM 文による CALIS プログラムはつぎのよ うになる。このデータの RAM 構造のための2つの行列 K R と Σexg のうち、前者を書き下すとつぎのようになる。この場合、観測変数は9個、一次因子 (潜在内生変数と見れる)は3個、二次因子(潜在外生変数と見れる)は1個あるの で、行列 KR の次数は (5.20) 式の定義から、13となる。ユーザは、後者に ついてもを書き下し、次頁のプログラムでよいことを確かめよ:
(5.35) |
*------------------------------------------------------------------------- * * A sas program for applying a CALIS analysis to a correlation matrix of * Thurstone reported by McDonald (1985). * *------------------------------------------------------------------------; data thurst(type=corr); title 'Example of Thurstone''s data reported by McDonald (1985)'; _type_ ='corr'; input _name_ $ senten vocabu sencom firlet fourlw suffic letser pedigr letgro; cards; senten 1. . . . . . . . . vocabu .828 1. . . . . . . . sencom .776 .779 1. . . . . . . firlet .439 .493 .460 1. . . . . . fourlw .432 .464 .425 .674 1. . . . . suffic .447 .489 .443 .590 .541 1. . . . letser .447 .432 .401 .381 .402 .288 1. . . pedigr .541 .537 .534 .350 .367 .320 .555 1. . letgro .380 .358 .359 .424 .446 .325 .598 .452 1. ; proc calis data=thurst method=max edf=212 pestim se; title2 'second-order confirmatory FA by a RAM statement'; ram 1 1 10 .5 beta1, 1 2 10 .5 beta2, 1 3 10 .5 beta3, 1 4 11 .5 beta4, 1 5 11 .5 beta5, 1 6 11 .5 beta6, 1 7 12 .5 beta7, 1 8 12 .5 beta8, 1 9 12 .5 beta9, 1 10 13 .5 alph1, 1 11 13 .5 alph2, 1 12 13 .5 alph3, 2 1 1 3. u11, 2 2 2 3. u12, 2 3 3 3. u13, 2 4 4 3. u14, 2 5 5 3. u15, 2 6 6 3. u16, 2 7 7 3. u17, 2 8 8 3. u18, 2 9 9 3. u19, 2 10 10 1. , 2 11 11 1. , 2 12 12 1. , 2 13 13 1. ; bounds 0. <= u11-u19; run; |
sem-Thurstone-ram.sas |