/*****        全角スペースがあるとエラーになるので注意 *****/
/*****                                                 *****/
/*****        欠損値処理                               *****/

MISSING VALUES  Q2 TO Q4 Q5AIMP TO Q5GSTS Q6A TO Q9D Q14S01 TO Q14S16
  Q16  Q19A Q19BS1 Q19BS2  (9)
 /Q11 Q15 edu (99)
 /Q10 Q12    (0).


/*****          新変数の作成                             *****/
/*****                                                   *****/

COMPUTE      property=Q14S01+Q14S02+Q14S03+Q14S04+Q14S05+Q14S06+Q14S07
             +Q14S08+Q14S09+Q14S10+Q14S11+Q14S13+Q14S14.

/*****    GAKUREKI WO KYOUIKU NENSUU HE HENKAN     *****/
COMPUTE        EDU=Q16.
RECODE         EDU(1=6)(2=9)(3=12)(4=15)(5=16)(6=18)(7,9=99).


/*****    問１から年齢変数を作成     *****/
COMPUTE      AGE     =71-Q1NEN.
IF (Q1GETU<5) AGE=AGE+1.

COMPUTE living= age-q11.
COMPUTE livrate= living/age.

COMPUTE FAMILYNO=Q12.


/*****    回答方向を逆転した新変数を作成   *****/
COMPUTE      TYONAI =5-Q9A.
COMPUTE      YAKUNIN=5-Q9B.
COMPUTE      GIIN   =5-Q9C.
COMPUTE      KUMIAI =5-Q9D.

COMPUTE      DANZYO  =5-Q6A.
COMPUTE      YARITAI =5-Q6B.
COMPUTE      DENTO   =5-Q6C.
COMPUTE      TAKAITII=5-Q6D.
COMPUTE      KAERU   =5-Q6E.
COMPUTE      ONAZISYU=5-Q6F.
COMPUTE      FUKUSI  =5-Q6G.
COMPUTE      KOKUMIN =5-Q6H.
COMPUTE      SOUZOKU =5-Q6I.
COMPUTE      KEII    =5-Q6J.
COMPUTE      KEIZAIZI=5-Q6K.
COMPUTE      SYOTOKU =5-Q6L.
COMPUTE      SEITOUDA=5-Q6M.
COMPUTE      KAKUSA  =5-Q6N.


/*****  欠損値を除いて人数を減らす処理    *****/
SELECT IF age < 99.
SELECT IF edu ne 99.
SELECT IF PROPERTY < 14.
SELECT IF LIVING   < 99.

SELECT IF yakunin < 5.
SELECT IF giin    < 5.


*SELECT IF DANZYO    <5 .
*SELECT IF YARITAI   <5 .
SELECT IF DENTO     <5 .
*SELECT IF TAKAITII  <5 .
*SELECT IF KAERU     <5 .
SELECT IF ONAZISYU  <5 .
SELECT IF FUKUSI    <5 .
*SELECT IF KOKUMIN   <5 .
SELECT IF SOUZOKU   <5 .
SELECT IF KEII      <5 .
SELECT IF KEIZAIZI  <5 .
SELECT IF SYOTOKU   <5 .
*SELECT IF SEITOUDA  <5 .
SELECT IF KAKUSA    <5 .
*SELECT IF FUKOHEI   <5 .


/*****  分析命令文    *****/
FREQUENCIES VAR = FUKUSI.