Elfelejtette a jelszavát?
Új felhasználó?
Dokumentummal kapcsolatos tevékenységek
háztartástipológia syntax 1993
A fájl letöltéséhez kattintson ide.
Fájl tartalma
* 93 hztarts sszettel .
GET FILE = 'd:\Panel99_CD_Elokeszulet\1993\1993.sav'
/keep
eazon93 h2htsz93 akttag93
h2bsor1 h2bnem1 h2bszu1 h2bcsl1 h2bht1x h2bgye1 h2btov1
h2bsor2 h2bnem2 h2bszu2 h2bcsl2 h2bht2 h2bgye2 h2btov2
h2bsor3 h2bnem3 h2bszu3 h2bcsl3 h2bht3 h2bgye3 h2btov3
h2bsor4 h2bnem4 h2bszu4 h2bcsl4 h2bht4 h2bgye4 h2btov4
h2bsor5 h2bnem5 h2bszu5 h2bcsl5 h2bht5 h2bgye5 h2btov5
h2bsor6 h2bnem6 h2bszu6 h2bcsl6 h2bht6 h2bgye6 h2btov6
h2bsor7 h2bnem7 h2bszu7 h2bcsl7 h2bht7 h2bgye7 h2btov7
h2bsor8 h2bnem8 h2bszu8 h2bcsl8 h2bht8 h2bgye8 h2btov8
h2bsor9 h2bnem9 h2bszu9 h2bcsl9 h2bht9 h2bgye9 h2btov9
h2bsor10 h2bnem10 h2bszu10 h2bcsl10 h2bht10 h2bgye10 h2btov10
h2bsor11 h2bnem11 h2bszu11 h2bcsl11 h2bht11 h2bgye11 h2btov11
h2bsor12 h2bnem12 h2bszu12 h2bcsl12 h2bht12 h2bgye12 h2btov12
h2bsor13 h2bnem13 h2bszu13 h2bcsl13 h2bht13 h2bgye13 h2btov13
h2bsor14 h2bnem14 h2bszu14 h2bcsl14 h2bht14 h2bgye14 h2btov14 .
select if (akttag93 = 1).
execute.
compute hsize93 = 0.
compute ht93 = 0.
compute hhage93 = 0.
compute hhage93a = 0.
compute h2bbaba = 0.
compute h2bbaba2 = 0.
compute h2bkor18 = 0.
format hsize93
ht93
hhage93
hhage93a
h2bbaba
h2bbaba2
h2bkor18 (f2.0).
* A hztartstagok kora .
Compute h2bkor1 = 93 - h2bszu1.
Compute h2bkor2 = 93 - h2bszu2.
Compute h2bkor3 = 93 - h2bszu3.
Compute h2bkor4 = 93 - h2bszu4.
Compute h2bkor5 = 93 - h2bszu5.
Compute h2bkor6 = 93 - h2bszu6.
Compute h2bkor7 = 93 - h2bszu7.
Compute h2bkor8 = 93 - h2bszu8.
Compute h2bkor9 = 93 - h2bszu9.
Compute h2bkor10 = 93 - h2bszu10.
Compute h2bkor11 = 93 - h2bszu11.
Compute h2bkor12 = 93 - h2bszu12.
Compute h2bkor13 = 93 - h2bszu13.
Compute h2bkor14 = 93 - h2bszu14.
* Ujrakdoljuk a 18 v alatti gyermekeket .
If (h2bht1x eq 4 and h2bkor1 gt 18) h2bht1x = 9.
If (h2bht2 eq 4 and h2bkor2 gt 18) h2bht2 = 9.
If (h2bht3 eq 4 and h2bkor3 gt 18) h2bht3 = 9.
If (h2bht4 eq 4 and h2bkor4 gt 18) h2bht4 = 9.
If (h2bht5 eq 4 and h2bkor5 gt 18) h2bht5 = 9.
If (h2bht6 eq 4 and h2bkor6 gt 18) h2bht6 = 9.
If (h2bht7 eq 4 and h2bkor7 gt 18) h2bht7 = 9.
If (h2bht8 eq 4 and h2bkor8 gt 18) h2bht8 = 9.
If (h2bht9 eq 4 and h2bkor9 gt 18) h2bht9 = 9.
If (h2bht10 eq 4 and h2bkor10 gt 18) h2bht10 = 9.
If (h2bht11 eq 4 and h2bkor11 gt 18) h2bht11 = 9.
If (h2bht12 eq 4 and h2bkor12 gt 18) h2bht12 = 9.
If (h2bht13 eq 4 and h2bkor13 gt 18) h2bht13 = 9.
If (h2bht14 eq 4 and h2bkor14 gt 18) h2bht14 = 9.
If ((h2bht1x eq 7 or h2bht1x eq 8) and h2bkor1 le 18) h2bht1x = 10.
If ((h2bht2 eq 7 or h2bht2 eq 8) and h2bkor2 le 18) h2bht2 = 10.
If ((h2bht3 eq 7 or h2bht3 eq 8) and h2bkor3 le 18) h2bht3 = 10.
If ((h2bht4 eq 7 or h2bht4 eq 8) and h2bkor4 le 18) h2bht4 = 10.
If ((h2bht5 eq 7 or h2bht5 eq 8) and h2bkor5 le 18) h2bht5 = 10.
If ((h2bht6 eq 7 or h2bht6 eq 8) and h2bkor6 le 18) h2bht6 = 10.
If ((h2bht7 eq 7 or h2bht7 eq 8) and h2bkor7 le 18) h2bht7 = 10.
If ((h2bht8 eq 7 or h2bht8 eq 8) and h2bkor8 le 18) h2bht8 = 10.
If ((h2bht9 eq 7 or h2bht9 eq 8) and h2bkor9 le 18) h2bht9 = 10.
If ((h2bht10 eq 7 or h2bht10 eq 8) and h2bkor10 le 18) h2bht10 = 10.
If ((h2bht11 eq 7 or h2bht11 eq 8) and h2bkor11 le 18) h2bht11 = 10.
If ((h2bht12 eq 7 or h2bht12 eq 8) and h2bkor12 le 18) h2bht12 = 10.
If ((h2bht13 eq 7 or h2bht13 eq 8) and h2bkor13 le 18) h2bht13 = 10.
If ((h2bht14 eq 7 or h2bht14 eq 8) and h2bkor14 le 18) h2bht14 = 10.
* Megszmoljuk a hztarts tagokat .
Count c1 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (1).
Count c2 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (2).
Count c3 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (3).
Count c4 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (4).
Count c5 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (5).
Count c6 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (6).
Count c7 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (7).
Count c8 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (8).
Count c9 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (9).
Count c10 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14 (10).
* Hztarts nagysg .
* Count hsize93 = H2BHT1x H2BHT2 H2BHT3 H2BHT4 H2BHT5 H2BHT6 H2BHT7
H2BHT8 H2BHT9 H2BHT10 H2BHT11 H2BHT12 H2BHT13 H2BHT14
(1 thru 10).
compute hsize93 = h2htsz93.
* Hztarts sszettel1: segdvltozk bevezetse .
Recode c1 to c10 (sysmis, missing, 0.00, 0=0).
Compute c23 = 0.
Compute c56 = 0.
Compute c49 = 0.
Compute c410 = 0.
Compute c910 = 0.
If (c2 eq 1 or c3 eq 1) c23=1.
If (c5 ge 1 or c6 ge 1) c56=1.
If (c4 gt 0 and c9 gt 0) c49=1.
If (c4 gt 0 and c10 gt 0) c410=1.
If (c9 gt 0 and c10 gt 0) c910=1.
Compute c78=c7+c8.
Compute c5678=c5+c6+c7+c8.
Compute c156=c1+c5+c6.
Compute c12356=c1+c2+c3+c5+c6.
Compute c14=c1+c4.
Compute c19=c1+c9.
Compute c110=c1+c10.
Compute c1234=c1+c2+c3+c4.
Compute c1239=c1+c2+c3+c9.
Compute c12310=c1+c2+c3+c10.
Compute c1564=c1+c5+c6+c4.
Compute c1569=c1+c5+c6+c9.
Compute c15610=c1+c5+c6+c10.
Compute c123564=c1+c2+c3+c5+c6+c4.
Compute c123569=c1+c2+c3+c5+c6+c9.
Compute c1235610=c1+c2+c3+c5+c6+c10.
Compute c156784=c1+c5+c6+c7+c8+c4.
Compute c156789=c1+c5+c6+c7+c8+c9.
Compute c1567810=c1+c5+c6+c7+c8+c10.
Compute c1_8=c1+c2+c3+c5+c6+c7+c8+c4.
Compute c1_9_4=c1+c2+c3+c5+c6+c7+c8+c9.
Compute c1_10_49=c1+c2+c3+c5+c6+c7+c8+c10.
Compute c15678=c1+c5+c6+c7+c8.
Compute c1235678=c1+c2+c3+c5+c6+c7+c8.
Compute c12349=c1+c2+c3+c4+c9.
Compute c123410=c1+c2+c3+c4+c10.
Compute c123910=c1+c2+c3+c9+c10.
Compute c149=c1+c4+c9.
Compute c1410=c1+c4+c10.
Compute c1910=c1+c9+c10.
* Hztarts sszettel2:hztartstpusok ltrehozsa .
Compute ht93=0.
If (hsize93 gt 0) ht93=33.
If (hsize93 eq 1) ht93=1.
If (c23 eq 1 and hsize93 eq 2) ht93=2.
If (c23 ne 1 and hsize93 eq 2) ht93=3.
If (c23 eq 1 and c4 gt 0 and hsize93 eq c1234) ht93=4.
If (c23 eq 1 and c9 gt 0 and hsize93 eq c1239) ht93=5.
If (c23 eq 1 and c10 gt 0 and hsize93 eq c12310) ht93=6.
If (c23 eq 1 and c56 gt 0 and c4 gt 0 and hsize93 eq c123564) ht93=7.
If (c23 eq 1 and c56 gt 0 and c9 gt 0 and hsize93 eq c123569) ht93=8.
If (c23 eq 1 and c56 gt 0 and c10 gt 0 and hsize93 eq c1235610) ht93=9.
If (c23=1 and c5678>0 and c78>0 and c4>0 and hsize93=c1_8) ht93=10.
If (c23=1 and c5678>0 and c78>0 and c9>0 and hsize93=c1_9_4) ht93=11.
If (c23=1 and c5678>0 and c78>0 and c10>0 and hsize93=c1_10_49) ht93=12.
If (c4 gt 0 and hsize93 eq c14) ht93=13.
If (c9 gt 0 and hsize93 eq c19) ht93=14.
If (c10 gt 0 and hsize93 eq c110) ht93=15.
If (c4 gt 0 and c56 gt 0 and hsize93 eq c1564) ht93=16.
If (c9 gt 0 and c56 gt 0 and hsize93 eq c1569) ht93=17.
If (c10 gt 0 and c56 gt 0 and hsize93 eq c15610) ht93=18.
If (c4 gt 0 and c5678>0 and c78>0 and hsize93 eq c156784) ht93=19.
If (c9 gt 0 and c5678>0 and c78>0 and hsize93 eq c156789) ht93=20.
If (c10 gt 0 and c5678>0 and c78>0 and hsize93 eq c1567810) ht93=21.
If (c23 gt 0 and c56 eq 1 and hsize93 eq c12356) ht93=22.
If (c23 gt 0 and c5678>0 and c78>0 and hsize93 eq c1235678) ht93=23.
If (c56 gt 0 and hsize93 eq c156) ht93=24.
If (c5678 gt 0 and c78 gt 0 and hsize93 eq c15678) ht93=25.
If (c23 eq 1 and c49 eq 1 and hsize93=c12349) ht93=26.
If (c23 eq 1 and c410 eq 1 and hsize93=c123410) ht93=27.
If (c23 eq 1 and c910 eq 1 and hsize93=c123910) ht93=28.
If (c49 eq 1 and hsize93=c149) ht93=29.
If (c410 eq 1 and hsize93=c1410) ht93=30.
If (c910 eq 1 and hsize93=c1910) ht93=31.
If (ht93 eq 33 and (c4 gt 0 or c10 gt 0)) ht93=32.
Recode ht93 (0=sysmis).
* A 18 v alatti hztartstagok szma .
Count h2bkor18 = h2bkor1 h2bkor2 h2bkor3 h2bkor4 h2bkor5 h2bkor6 h2bkor7
h2bkor8 h2bkor9 h2bkor10 h2bkor11 h2bkor12 h2bkor13 h2bkor14
(0 thru 18).
If (hsize93=0) h2bkor18=999.
Recode h2bkor18 (999=sysmis).
* A hztartsf kora .
If (h2bht1x = 1) hhage93a = h2bkor1.
If (h2bht2 = 1) hhage93a = h2bkor2.
If (h2bht3 = 1) hhage93a = h2bkor3.
If (h2bht4 = 1) hhage93a = h2bkor4.
If (h2bht5 = 1) hhage93a = h2bkor5.
If (h2bht6 = 1) hhage93a = h2bkor6.
If (h2bht7 = 1) hhage93a = h2bkor7.
If (h2bht8 = 1) hhage93a = h2bkor8.
If (h2bht9 = 1) hhage93a = h2bkor9.
If (h2bht10 = 1) hhage93a = h2bkor10.
If (h2bht11 = 1) hhage93a = h2bkor11.
If (h2bht12 = 1) hhage93a = h2bkor12.
If (h2bht13 = 1) hhage93a = h2bkor13.
If (h2bht14 = 1) hhage93a = h2bkor14.
If (hsize93=0) hhage93a = 999.
Recode hhage93a (999=sysmis).
Recode hhage93a (lo thru 19 = 1) (20 thru 24 = 2) (25 thru 29 = 3)
(30 thru 34 = 4) (35 thru 39 = 5) (40 thru 44 = 6)
(45 thru 49 = 7) (50 thru 54 = 8) (55 thru 59 = 9)
(60 thru 64 = 10) (65 thru 69 = 11) (70 thru 74 = 12)
(75 thru 79 = 13) (80 thru hi = 14)
(else = sysmis) into hhage93.
* A legkisebb 16 v alatti hztartstag kora .
Compute h2bbaba2 = 999.
If (h2bkor1 le 16 and h2bkor1 lt h2bbaba2) h2bbaba2 = h2bkor1.
If (h2bkor2 le 16 and h2bkor2 lt h2bbaba2) h2bbaba2 = h2bkor2.
If (h2bkor3 le 16 and h2bkor3 lt h2bbaba2) h2bbaba2 = h2bkor3.
If (h2bkor4 le 16 and h2bkor4 lt h2bbaba2) h2bbaba2 = h2bkor4.
If (h2bkor5 le 16 and h2bkor5 lt h2bbaba2) h2bbaba2 = h2bkor5.
If (h2bkor6 le 16 and h2bkor6 lt h2bbaba2) h2bbaba2 = h2bkor6.
If (h2bkor7 le 16 and h2bkor7 lt h2bbaba2) h2bbaba2 = h2bkor7.
If (h2bkor8 le 16 and h2bkor8 lt h2bbaba2) h2bbaba2 = h2bkor8.
If (h2bkor9 le 16 and h2bkor9 lt h2bbaba2) h2bbaba2 = h2bkor9.
If (h2bkor10 le 16 and h2bkor10 lt h2bbaba2) h2bbaba2 = h2bkor10.
If (h2bkor11 le 16 and h2bkor11 lt h2bbaba2) h2bbaba2 = h2bkor11.
If (h2bkor12 le 16 and h2bkor12 lt h2bbaba2) h2bbaba2 = h2bkor12.
If (h2bkor13 le 16 and h2bkor13 lt h2bbaba2) h2bbaba2 = h2bkor13.
If (h2bkor14 le 16 and h2bkor14 lt h2bbaba2) h2bbaba2 = h2bkor14.
Recode h2bbaba2 (lo thru 3 = 1) ( 4 thru 6 = 2) ( 7 thru 9 = 3)
(10 thru 12 = 4) (13 thru 16 = 5) (else = 0) into h2bbaba.
If (hsize93=0) h2bbaba2 = 999.
Recode h2bbaba2 (999 = sysmis).
Recode hsize93 (0 = sysmis).
Variable Label hsize93 'Hztarts nagysg 93'
/ht93 'hztarts sszettel 1993'
/hhage93 'A hztartsf kora /14 kategria/'
/hhage93a 'A hztartsf kora /vek szma/'
/h2bbaba 'a legkisebb 16 alatti HT tag kora /5 kategria/'
/h2bbaba2 'a legkisebb 16 alatti HT tag kora /vek szma/'
/h2bkor18 'a 18 v alatti hztartstagok szma'.
Value Labels hhage93 1 '20 vesnl fiatalabb'
2 '20 - 24 ves'
3 '25 - 29 ves'
4 '30 - 34 ves'
5 '35 - 39 ves'
6 '40 - 44 ves'
7 '45 - 49 ves'
8 '50 - 54 ves'
9 '55 - 59 ves'
10 '60 - 64 ves'
11 '65 - 69 ves'
12 '70 - 74 ves'
13 '75 - 79 ves'
14 '80 ves vagy idsebb'
/h2bbaba 1 '3 ves vagy fiatalabb'
2 '4 - 6 ves'
3 '7 - 9 ves'
4 '10 - 12 ves'
5 '13 - 16 ves'
0 'nincs 16 vnl fiatalabb'
/ht93 1 'egyszemlyes hztarts'
2 'pr'
3 'ms ktszemlyes hztarts'
4 'pr+sajt gyermek<18'
5 'pr+sajt gyermek>18'
6 'pr+ms gyermek<18'
7 'pr+sajt gyermek<18+szl'
8 'pr+sajt gyermek>18+szl'
9 'pr+ms gyermek<18+szl'
10 'pr+sajt gyermek<18+ms felnttek(+szl)'
11 'pr+sajt gyermek>18+ms felnttek(+szl)'
12 'pr+ms gyermek<18+szl+ms rokonok'
13 'egyedlll szl+sajt gyermek<18'
14 'egyedlll szl+sajt gyermek>18'
15 'egyedlll szl+ms gyermek<18'
16 'egyedlll szl+sajt gyermek<18+szl'
17 'egyedlll szl+sajt gyermek>18+szl'
18 'egyedlll szl+ms gyermek<18+szl'
19 'egyedlll szl+sajt gyermek<18+ms felntt(+szl)'
20 'egyedlll szl+sajt gyermek>18+ms felntt(+szl)'
21 'egyedlll szl+ms gyermek<18+ms felntt(+szl)'
22 'pr+szls'
23 'pr+ms felnttek(+szls)'
24 'egyedlll szemly+szl'
25 'egyedlll szemly+ms rokonok'
26 'pr+sajt gyermek<18+sajt gyermek>18'
27 'pr+sajt gyermek<18+ms gyermek<18'
28 'pr+sajt gyermek>18+ms gyermek<18'
29 'egyedlll szl+sajt gyermek<18+sajt gyermek>18'
30 'egyedlll szl+sajt gyermek<18+ms gyermek<18'
31 'egyedlll szl+sajt gyermek>18+ms gyermek<18'
32 'egyb hztartsok gyermekkel<18'
33 'egyb hztartsok'.
Save Outfile = 'd:\Panel99_CD_Elokeszulet\1993\httip93.sav'
/Compressed
/Keep
eazon93 HSIZE93 HT93 H2BKOR18 HHAGE93 HHAGE93A H2BBABA H2BBABA2 .
Megjelent a HÉV kötet