/*****   新変数の作成  変数の値を逆転      *****/
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.
COMPUTE    FUKOHEI  =Q3.
COMPUTE      SEIMANZO=5-Q2.


/*****          変数にラベルを付ける                         *****/
VARIABL LABELS  DANZYO   '男は外で働き女は家庭'
 /YARITAI  '政治はやりたい人にまかせる'
 /DENTO    '伝統に合わないことも受け入れる'
 /TAKAITII '親の地位は必要'
 /KAERU    '政治を変えることはできない'
 /ONAZISYU 'すべての人が同収入'
 /FUKUSI   '福祉を充実'
 /KOKUMIN  '国民の意見は反映されない'
 /SOUZOKU  '相続税を増やしてもよい'
 /KEII     '権威のある人々には常に敬意を'
 /KEIZAIZI '政府が介入しないほうが'
 /SYOTOKU  '貧しい人の所得税は減らす'
 /SEITOUDA '自分の意見を代表する政党はない'
 /KAKUSA   '貧富の差が大きすぎる'
.


/*****          値にラベルを付ける                         *****/
VALUE LABELS   Q1SEX 1'男' 2'女'
/Q2   1 '満足している'  2 'どちらかといえば満足している'
      3 'どちらかといえば不満である' 4 '不満である'  9 'わからない'
/Q3 1 '公平だ' 2 'だいたい公平だ' 3 'あまり公平でない' 4 '公平でない'
       9 'わからない'
/Q4 1 '上' 2 '中の上' 3 '中の下' 4 '下の上' 5'下の下'
       9 'わからない'
/Q5AIMP TO Q5GIMP   1 '非常に重要' 2 '重要' 3 'それほど重要でない'
/Q5ASTS TO Q5GSTS   1 '満足' 2 'どちらともいえない' 3 '不満'
/Q6A TO Q6N 1 'そう思う' 2 'どちらかといえばそう思う'
      3 'どちらかといえばそう思わない' 4 'そう思わない'
      9 'わからない'
/DANZYO TO KAKUSA 1 'そう思わない' 2 'どちらかといえばそう思わない'
      3 'どちらかといえばそう思う' 4 'そう思う'
      9 'わからない'
.


/*****  欠損値を除く処理    *****/
*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 .


/*****  因子分析の命令文   *****/
FACTOR 
  /VARIABLES Q6A Q6B Q6C Q6D Q6E Q6F Q6G Q6H Q6I Q6J Q6K Q6L Q6M Q6N 
  /MISSING LISTWISE 
  /PRINT INITIAL EXTRACTION ROTATION 
  /EXTRACTION PC 
  /ROTATION VARIMAX 
  /METHOD=CORRELATION.