
GET
  FILE='C:\banque mondiale\population.SAV'.
WEIGHT
  OFF.

if (a1=1 and a6=1)strate=1.
if (a1 ne 1 and a6=1)strate=2.
if (a6=2)strate=3.

val lab strate
1 "Dakar"
2 "autres villes"
3 "rural".
execute.

select if  menb1=1.
if (educ4=2)niv=1.
if (educ5 >=0 and educ5<=1)niv=1.
if (educ5 >=2 and educ5<=7)niv=2.
if (educ5 >=8 and educ5<=11)niv=3.
if (educ5 >11)niv=4.
EXECUTE.
SORT CASES BY
  a1 (A) a2 (A) a6 (A) a7 (A) a8 (A) .

save outfile='C:\banque mondiale\education.SAV'/keep a1 a2 a6 a7 a8 niv strate.

GET
  FILE='C:\banque mondiale\produits.sav'.

execute.

SORT CASES BY
  a1 (A) a2 (A) a6 (A) a7 (A) a8 (A) .
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr0.sav'
  /BREAK=a1 a2 a6 a7 a8
  /consom_1 = SUM(consomma).

********************biens equip.

GET
  FILE='C:\banque mondiale\produits.sav'.

select if  code_dep =66  or code_dep =71 or code_dep =72.

*select if code_dep ~=59 & code_dep ~=69 .

*select if (code_dep > 14 & code_dep < 42) .

execute.

SORT CASES BY
  a1 (A) a2 (A) a6 (A) a7 (A) a8 (A) .
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr0.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\education.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.

COMPUTE rapport = consomma/consom_1 .
EXECUTE .

SORT CASES BY
  STRATE niv code_dep (A) .
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr2.sav'
  /BREAK=STRATE niv code_dep
  /rapmed = MEDIAN(rapport)
  /ecartyp= SD(consomma).

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr2.sav'
 /BY STRATE niv code_dep.
EXECUTE.


SORT CASES BY
  STRATE niv code_dep (A) .
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr3.sav'
  /BREAK=STRATE niv code_dep
  /sd_rap= SD(rapport)
  /moyenne = MEAN(consomma)
  /mediane = MEDIAN(consomma).

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr3.sav'
 /BY STRATE niv code_dep.
EXECUTE.

compute seuil1=moyenne+2*ecartyp.

compute seuil2=rapmed+2*sd_rap.
execute.

compute depcons=consomma.

if (seuil2  <  rapport)depcons = consomma*rapmed.

*if (seuil1  <  consomma)depcons = mediane.

*if (seuil1  <  consomma and (code_dep ~=72))depcons = mediane.

*if (seuil1  <  consomma)depcons = consomma*rapmed.

*if (seuil1  <  consomma)depcons = moyenne.

EXECUTE .

save outfile='C:\banque mondiale\bien.sav'.

******************************alimentaires.

GET
  FILE='C:\banque mondiale\produits.sav'.

select if code_dep ~=59 & code_dep ~=66 & code_dep ~=69 & code_dep ~=71 & code_dep ~=72.

*select if code_dep ~=59 & code_dep ~=69 .


select if (code_dep > 14 & code_dep < 42) .

execute.

SORT CASES BY
  a1 (A) a2 (A) a6 (A) a7 (A) a8 (A) .
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr0.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.

COMPUTE rapport = consomma/consom_1 .
EXECUTE .

SORT CASES BY
  a1 (A) a2 (A) a6 (A) a7 (A) a8 (A) .
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr0.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\education.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.


COMPUTE rapport = consomma/consom_1 .
EXECUTE .

SORT CASES BY
  STRATE niv code_dep (A) .
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr2.sav'
  /BREAK=STRATE niv code_dep
  /rapmed = MEDIAN(rapport)
  /ecartyp= SD(consomma).

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr2.sav'
 /BY STRATE niv code_dep.
EXECUTE.

SORT CASES BY
  STRATE niv code_dep (A) .
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr3.sav'
  /BREAK=STRATE niv code_dep
  /sd_rap= SD(rapport)
  /moyenne = MEAN(consomma)
  /mediane = MEDIAN(consomma).

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr3.sav'
 /BY STRATE niv code_dep.
EXECUTE.


compute seuil1=moyenne+2*ecartyp.

compute seuil2=rapmed+2*sd_rap.
execute.

compute depcons=consomma.

*if (seuil1  <  consomma)depcons = mediane.

if (seuil2  <  rapport)depcons = consomma*rapmed.

*if (seuil1  <  consomma)depcons = consomma*rapmed.

*if (seuil1  <  consomma)depcons = moyenne.

EXECUTE .

save outfile='C:\banque mondiale\alim.sav'.

**********************non alimentaires.
GET
  FILE='C:\banque mondiale\produits.sav'.

select if code_dep ~=59 & code_dep ~=66 & code_dep ~=69 & code_dep ~=71 & code_dep ~=72.

*select if code_dep ~=59 & code_dep ~=69 .

select if (code_dep < 15 or code_dep > 41) .

execute.

SORT CASES BY
  a1 (A) a2 (A) a6 (A) a7 (A) a8 (A) .
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr0.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\education.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.

COMPUTE rapport = consomma/consom_1 .
EXECUTE .


SORT CASES BY
  a1 (A) a2 (A) a6 (A) a7 (A) a8 (A) .
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr0.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.

COMPUTE rapport = consomma/consom_1 .
EXECUTE .

SORT CASES BY
  STRATE niv code_dep (A) .
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr2.sav'
  /BREAK=STRATE niv code_dep
  /rapmed = MEDIAN(rapport)
  /ecartyp= SD(consomma).

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr2.sav'
 /BY STRATE niv code_dep.
EXECUTE.

SORT CASES BY
  STRATE niv code_dep (A) .
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr3.sav'
  /BREAK=STRATE niv code_dep
  /sd_rap= SD(rapport)
  /moyenne = MEAN(consomma)
  /mediane = MEDIAN(consomma).

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr3.sav'
 /BY STRATE niv code_dep.
EXECUTE.

compute seuil1=moyenne+2*ecartyp.

compute seuil2=rapmed+2*sd_rap.
execute.

compute depcons=consomma.

if (seuil2  <  rapport and code_dep ~=46)depcons = consomma*rapmed.

*if (seuil1  <  consomma)depcons = mediane.

*if (seuil1  <  consomma and code_dep ~=67 & code_dep ~=68 & code_dep ~=70)depcons = mediane.

*if (seuil1  <  consomma)depcons = seuil1 .
*EXECUTE .

save outfile='C:\banque mondiale\nonalim.sav'.

ADD FILES /FILE=*
 /FILE='C:\banque mondiale\alim.sav'.
EXECUTE.

ADD FILES /FILE=*
 /FILE='C:\banque mondiale\bien.sav'.
EXECUTE.

sort cases by a1 a2 a6 a7 a8 code_dep.

save outfile='C:\banque mondiale\produits_27_06.sav'.

temp.
select if code_dep= 1.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep1.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli1_1 'frais de scolarité' = SUM(depcons).

temp.
select if code_dep=2.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep2.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli1_2 'livres et fournitures' = SUM(depcons).

temp.
select if code_dep=3.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep3.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli1_3 'frais de transport scolaire' = SUM(depcons).

temp.
select if code_dep=4.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep4.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli1_4 'uniformes et tenues' = SUM(depcons).

temp.
select if code_dep=5.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep5.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli1_5 'diverses contributions' = SUM(depcons).

*******************************.
temp.
select if code_dep=6.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep6.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli2_1 'consultations' = SUM(depcons).

temp.
select if code_dep=7.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep7.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli2_2 'médicaments et pharmacopée' = SUM(depcons).

temp.
select if code_dep=8.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep8.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli2_3 'hospitalisation' = SUM(depcons).

temp.
select if code_dep=9.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep9.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli2_4 'examens et soins médicaux' = SUM(depcons).

temp.
select if code_dep=10.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep10.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli2_5 'lunettes et prothéses' = SUM(depcons).

temp.
select if code_dep=11.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep11.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli2_6 'materiels de traitement' = SUM(depcons).

*******************************.

temp.
select if code_dep=12.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep12.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli3_1 'produits agricoles' = SUM(depcons).

temp.
select if code_dep=13.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep13.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli3_2 "produits d'élevage" = SUM(depcons).

temp.
select if code_dep=14.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep14.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /scoli3_3 'produits de la pêche' = SUM(depcons).
*********************************.

temp.
select if code_dep=15.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep15.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_1 'mil, sorgho, maïs, fond' = SUM(depcons).

temp.
select if code_dep=16.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep16.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_2 'Sous-produits (sankhal,farine de mil...)' = SUM(depcons).

temp.
select if code_dep=17.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep17.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_3 'Riz entier et Riz Brisé' = SUM(depcons).

temp.
select if code_dep=18.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep18.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_4 'Arachides et Sous-produits' = SUM(depcons).

temp.
select if code_dep=19.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep19.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_5 'Huiles végétales/Arachides' = SUM(depcons).

temp.
select if code_dep=20.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep20.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_6 'Autres Huiles (huile de palme,deew gnor,deew rith)' = SUM(depcons).

temp.
select if code_dep=21.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep21.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_7 'Tomate concentrée' = SUM(depcons).

temp.
select if code_dep=22.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep22.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_8 'Tomate Fraiche' = SUM(depcons).

temp.
select if code_dep=23.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep23.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_9 'Légumes et Tubercules' = SUM(depcons).

temp.
select if code_dep=24.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep24.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_10 'Condiments et Assaisonnement' = SUM(depcons).

temp.
select if code_dep=25.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep25.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_11 'Poissons Frais' = SUM(depcons).

temp.
select if code_dep=26.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep26.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_12 'Viande' = SUM(depcons).

temp.
select if code_dep=27.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep27.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_13 'Volaille (poulet,canard)' = SUM(depcons).

temp.
select if code_dep=28.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep28.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_14 'Sucre en morceau et granulé' = SUM(depcons).

temp.
select if code_dep=29.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep29.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_15 'Sucre en morceau et granulé' = SUM(depcons).

temp.
select if code_dep=30.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep30.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_16 'Café' = SUM(depcons).

temp.
select if code_dep=31.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep31.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_17 'Thé' = SUM(depcons).

temp.
select if code_dep=32.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep32.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_18 'Cola' = SUM(depcons).

temp.
select if code_dep=33.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep33.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_19 'Boissons non alcoolisées' = SUM(depcons).

temp.
select if code_dep=34.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep34.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_20 'Jus de Fruits Locaux' = SUM(depcons).

temp.
select if code_dep=35.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep35.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_21 'Boissons Alcoolisées' = SUM(depcons).

temp.
select if code_dep=36.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep36.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_22 'Pain de blé/mil' = SUM(depcons).

temp.
select if code_dep=37.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep37.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_23 'Gateaux et autres biscuits' = SUM(depcons).

temp.
select if code_dep=38.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep38.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_24 'Lait (Concentré ou Frais)' = SUM(depcons).

temp.
select if code_dep=39.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep39.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_25 'Autres produits laitiers' = SUM(depcons).

temp.
select if code_dep=40.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep40.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_26 'Fruits (Banane,Pomme,Orange...)' = SUM(depcons).

temp.
select if code_dep=41.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep41.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /alim1_27 'Repas et Alim. Cons. hors domicile)' = SUM(depcons).
***********************************.

temp.
select if code_dep=42.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep42.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_1 "Savon et Produits d'entretien"= SUM(depcons).

temp.
select if code_dep=43.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep43.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_2 'Gaz' = SUM(depcons).

temp.
select if code_dep=44.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep44.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_3 'Charbon de bois' = SUM(depcons).

temp.
select if code_dep=45.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep45.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_4 'Bois' = SUM(depcons).

temp.
select if code_dep=46.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep46.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_5 'Loyer' = SUM(depcons).

temp.
select if code_dep=47.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep47.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_6 'Eclairage : Bougie-Pétrole' = SUM(depcons).

temp.
select if code_dep=48.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep48.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_7 'Hygiène et soin corporel' = SUM(depcons).

temp.
select if code_dep=49.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep49.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_8 'Cigarette-Tabac' = SUM(depcons).

temp.
select if code_dep=50.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep50.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_9 'Loisirs : Cinéma-Sport-Lecture' = SUM(depcons).

temp.
select if code_dep=51.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep51.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_10 'Domestique' = SUM(depcons).

temp.
select if code_dep=52.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep52.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_11 'Petit Equipement du Menage' = SUM(depcons).

temp.
select if code_dep=53.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep53.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_12 'Vétements' = SUM(depcons).

temp.
select if code_dep=54.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep54.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_13 'Tissus' = SUM(depcons).

temp.
select if code_dep=55.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep55.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_14 'Confection' = SUM(depcons).

temp.
select if code_dep=56.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep56.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_15 'Chaussures' = SUM(depcons).

temp.
select if code_dep=57.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep57.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_16 'Produits comestiques' = SUM(depcons).

temp.
select if code_dep=58.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep58.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_17 'Dépense sur Véhicules' = SUM(depcons).

*temp.
*select if code_dep=59.
*AGGREGATE
*  /OUTFILE='C:\banque mondiale\cons\dep59.sav'
*  /BREAK=a1 a2 a6 a7 a8 code_dep
*  /aln11_18 'Transferts Verses' = SUM(depcons).

temp.
select if code_dep=60.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep60.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_19 'Transport' = SUM(depcons).

temp.
select if code_dep=61.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep61.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_20 'Dépenses Réparations/Modification du Logement' = SUM(depcons).

temp.
select if code_dep=62.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep62.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln11_21 'Autres Dépenses' = SUM(depcons).


*******************************.
temp.
select if code_dep=63.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep63.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln12_1 'eau' = SUM(depcons).

temp.
select if code_dep=64.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep64.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln12_2 'électricité' = SUM(depcons).

temp.
select if code_dep=65.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep65.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln12_3 'téléphone fixe, portable, télécentre' = SUM(depcons).
**********************************.

temp.
select if code_dep=66.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep66.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln13_1 'Dépenses de Constructions' = SUM(depcons).

temp.
select if code_dep=67.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep67.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln13_2 'Cérémonies Diverses' = SUM(depcons).

temp.
select if code_dep=68.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep68.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln13_3 'Fétes (Korité,Tabaski,Noël,....)' = SUM(depcons).

*temp.
*select if code_dep=69.
*AGGREGATE
*  /OUTFILE='C:\banque mondiale\cons\dep69.sav'
*  /BREAK=a1 a2 a6 a7 a8 code_dep
*  /aln13_4 'Impôts,Amendes,Taxes,Contravention...' = SUM(depcons).

temp.
select if code_dep=70.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep70.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln13_5 'achats et modification de parures' = SUM(depcons).

temp.
select if code_dep=71.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep71.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln13_6 'Mobilier et Equipement Durable' = SUM(depcons).

temp.
select if code_dep=72.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep72.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /aln13_7 'Achats de moyens de transports' = SUM(depcons).

temp.
select if code_dep=73.
AGGREGATE
  /OUTFILE='C:\banque mondiale\cons\dep73.sav'
  /BREAK=a1 a2 a6 a7 a8 code_dep
  /loyimp  'loyers imputés' = SUM(depcons).

GET
  FILE='C:\banque mondiale\cons\dep1.sav'.

MATCH FILES /FILE=*
 /RENAME (code_dep = d0)
 /FILE='C:\banque mondiale\cons\dep2.sav'
 /RENAME (code_dep = d1)
 /BY a1 a2 a6 a7 a8
 /DROP= d0 d1.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep3.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep4.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep5.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep6.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep7.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep8.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep9.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep10.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep11.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep12.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep13.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep14.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep15.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep16.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep17.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep18.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep19.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep20.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep21.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep22.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep23.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep24.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep25.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep26.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep27.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep28.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep29.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep30.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep31.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep32.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep33.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep34.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep35.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep36.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep37.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep38.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep39.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep40.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep41.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep42.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep43.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep44.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep45.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep46.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep47.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep48.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep49.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep50.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep51.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep52.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep53.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep54.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep55.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep56.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep57.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep58.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep60.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep61.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep62.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep63.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep64.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep65.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep66.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.


MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep67.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep68.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep70.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep71.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep72.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.


MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\cons\dep73.sav'
 /RENAME (code_dep = d0)
 /BY a1 a2 a6 a7 a8
 /DROP= d0.
EXECUTE.

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr.sav'
 /BY a1 a2 a6 a7 a8.
EXECUTE.

********1.
RECODE
 aln13_1 aln13_2 aln13_3 aln13_5 aln13_6 aln13_7 (SYSMIS=0)  .
EXECUTE .

********+aln13_3.

compute depaut=aln13_2+aln13_3+aln13_5++aln13_6+aln13_7.
var lab depaut "autres dépenses".
********.  
RECODE
aln12_1 aln12_2 aln12_3 (SYSMIS=0)  .
EXECUTE .

compute deplog=aln12_1+aln12_2+aln12_3.
var lab deplog "dépenses de logement".  
*********2.
RECODE
aln11_1 aln11_2 aln11_3 aln11_4 aln11_5 aln11_6  aln11_7  aln11_8  aln11_9  aln11_10  aln11_11  
aln11_12  aln11_13  aln11_14  aln11_15  aln11_16  aln11_17 aln11_19  aln11_20  
aln11_21(SYSMIS=0)  .
recode aln11_5 (low thru 14999 = 0).
EXECUTE .

compute depnalim=aln11_1+aln11_2+aln11_3+aln11_4+aln11_5+aln11_6+aln11_7+aln11_8+aln11_9
+aln11_10+aln11_11+aln11_12+aln11_13+aln11_14+aln11_15+aln11_16+aln11_17
+aln11_19+aln11_20+aln11_21.
var lab depnalim "dépenses non alimentaires".  
**********3.
RECODE
alim1_1 alim1_2 alim1_3 alim1_4 alim1_5 alim1_6  alim1_7  alim1_8  alim1_9  alim1_10  alim1_11  alim1_12  
alim1_13  alim1_14  alim1_15  alim1_16  alim1_17  alim1_18  alim1_19  alim1_20  alim1_21  alim1_22  alim1_23  
alim1_24  alim1_25  alim1_26 alim1_27 (SYSMIS=0)  .
EXECUTE .

compute depalim=alim1_1+alim1_2+alim1_3+alim1_4+alim1_5+alim1_6+alim1_7+alim1_8+alim1_9+alim1_10+alim1_11
+alim1_12+alim1_13+alim1_14+alim1_15+alim1_16+alim1_17+alim1_18+alim1_19+alim1_20+alim1_21+alim1_22+alim1_23  
+alim1_24+alim1_25+alim1_26+alim1_27.

var lab depalim "dépenses alimentaires".  
**********4.

RECODE
  scoli2_1 scoli2_2 scoli2_3 scoli2_4 scoli2_5 scoli2_6  (SYSMIS=0)  .
EXECUTE .

compute depsant=scoli2_1+scoli2_2+scoli2_3+scoli2_4+scoli2_5+scoli2_6  .
var lab depsant "dépenses de santé".  
*********5.
RECODE
  scoli1_1 scoli1_2 scoli1_3 scoli1_4 scoli1_5  (SYSMIS=0)  .
EXECUTE .

compute depscol=scoli1_1+scoli1_2+scoli1_3+scoli1_4+scoli1_5.
var lab depscol "dépenses scolaires".  
**********.
RECODE
  scoli3_1 scoli3_2 scoli3_3 (SYSMIS=0)  .
EXECUTE .

compute depauto=scoli3_1+scoli3_2+scoli3_3.
var lab depauto "autodepconstion".  

RECODE
  loyimp (SYSMIS=0)  .
EXECUTE .

COMPUTE TOTALIM=depalim+depauto.
var lab totalim "dépenses totales alimentaires et autoconsommation".
COMPUTE TOTNALIM=depnalim+depscol+depsant+deplog+depaut+loyimp.
var lab totnalim "dépenses totales non alimentaires".
COMPUTE deptot=TOTALIM+TOTNALIM.
var lab deptot "dépenses annuelles totales".
execute.


COMPUTE DPEALIM = TOTALIM / (eqadul*365) .
EXECUTE .

COMPUTE DPENALIM = TOTNALIM / (eqadul*365) .
EXECUTE .

if (a1=1 and a6=1)strate=1.
if (a1 ne 1 and a6=1)strate=2.
if (a6=2)strate=3.

val lab strate
1 "Dakar"
2 "autres villes"
3 "rural".
execute.

SORT CASES BY
  strate (A) .

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\seuilal strate 18 06.sav'
 /BY strate.
EXECUTE.

*recode strate (1,2=1) (3=2) into strate2.

COMPUTE seuil5 = (seuilal/100)*5 .
EXECUTE .

COMPUTE seuilinf = seuilal-seuil5 .
EXECUTE .

COMPUTE seuilsup = seuilal+seuil5 .
EXECUTE .

compute depeqt=deptot/eqadul.
compute depeqtj=deptot/(eqadul*365).

execute.

save outfile='C:\banque mondiale\MENAGE_25_06.sav'.
 sort cases by a7.
MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\poids.sav'
 /BY a7.
EXECUTE.

compute pds=poid_fin*taille.
compute pds2=poid_fin*eqadul.

 sort cases by strate.

temp.
select if (dpealim >= seuilinf & dpealim <= seuilsup).
wei by pds2.
AGGREGATE
  /OUTFILE='C:\banque mondiale\aggr6.sav'
  /BREAK=strate
  /seuilnal = MEAN(DPENALIM).

MATCH FILES /FILE=*
 /TABLE='C:\banque mondiale\aggr6.sav'
 /BY strate.
EXECUTE.
recode seuilnal(sysmis=0).
COMPUTE seuilg = seuilal + seuilnal .
*if (strate=2)seuilg=747.01.
EXECUTE .

compute pov=0.
if (depeqtj<seuilg)pov=1.
val lab pov
0 "non pauvre"
1 "pauvre".
execute.

*sort cases by a7.
*MATCH FILES /FILE=*
* /TABLE='C:\banque mondiale\poids.sav'
* /BY a7.
*EXECUTE.

*compute pds=poid_fin*taille.

wei by pds.

var lab pov "individus pauvres".

CROSSTABS
  /TABLES=strate  BY pov
  /FORMAT= AVALUE TABLES
  /CELLS= COUNT ROW
  /COUNT ROUND CELL .

var lab pov "menage pauvre".

wei by poid_fin.

CROSSTABS
  /TABLES=strate  BY pov
  /FORMAT= AVALUE TABLES
  /CELLS= COUNT ROW
  /COUNT ROUND CELL .
