*   variable level xxx (scale) (ordinal) (nominal )     .


*   delete variable N_BREAK .
*   erase file  'delete1.sav'.

*   SAVE OUTFILE='.sav'
  /COMPRESSED.

*************.

*GET  FILE='.sav'

***************************                    *******************************.

*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.

************************************                    Basic statistics and consistency checks         *******************************************************  .

cd 'C:\1 Barbados\analisys'  .

***********************************************************.

*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='01 household_cover_12a_13.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 01 household_cover_12a_13.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='02 person_01-10.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 02 person_01-10.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='03 p_expenses_11.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 03 p_expenses_11.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='04 crop_12b.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 04 crop_12b.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='05 animal_12c.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 05 animal_12c.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='06 milk_12d.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 06 milk_12d.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='07 fish_12e.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 07 fish_12e.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='08 ag_input_12f.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 08 ag_input_12f.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='09 ag_asset_12g.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 09 ag_asset_12g.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='10 food_14a.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 10 food_14a.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='11 non_food_14b-d.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 11 non_food_14b-d.sav'
  /COMPRESSED.

***********************************************************.

GET  FILE='g2 poverty.sav'.

MATCH FILES /TABLE=*
  /FILE='12 emigration_15.sav'
  /RENAME (hh_size hhid_string psu stratum weight = d0 d1 d2 d3 d4) 
  /BY hhid
  /DROP= d0 d1 d2 d3 d4.
EXECUTE.

FILTER OFF.
USE ALL.
SELECT IF (quintile > 0).
EXECUTE.

SAVE OUTFILE='h 12 emigration_15.sav'
  /COMPRESSED.

***********************************************************.

*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.
*******Add the final consumption and poverty classification  to all the data files and select only households with poverty clasification********.





************************************                    Basic statistics and consistency checks         *******************************************************  .
************************************                    Basic statistics and consistency checks         *******************************************************  .
************************************                    Basic statistics and consistency checks         *******************************************************  .
************************************                    Basic statistics and consistency checks         *******************************************************  .
************************************                    Basic statistics and consistency checks         *******************************************************  .



GET FILE='f1 agregate.sav'.


WEIGHT BY weight3.

* Custom Tables.
CTABLES
  /VLABELS VARIABLES=cons_pc food_pc nonfood_pc house_pc h_services_pc health_pc education_pc 
    clothing_pc comunication_pc personal_pc entertaiment_pc furniture_pc other_pc engels quintile 
    DISPLAY=DEFAULT
  /TABLE cons_pc [S][MEAN] + food_pc [S][MEAN] + nonfood_pc [S][MEAN] + house_pc [S][MEAN] + 
    h_services_pc [S][MEAN] + health_pc [S][MEAN] + education_pc [S][MEAN] + clothing_pc [S][MEAN] + 
    comunication_pc [S][MEAN] + personal_pc [S][MEAN] + entertaiment_pc [S][MEAN] + furniture_pc 
    [S][MEAN] + other_pc [S][MEAN] + engels [S][MEAN] BY quintile [C]
  /CATEGORIES VARIABLES=quintile ORDER=A KEY=VALUE EMPTY=EXCLUDE TOTAL=YES POSITION=AFTER
  /TITLES
    TITLE="Average value of consumption per ca'pita by groups,  Barbados 2016".


* Custom Tables.
CTABLES
  /VLABELS VARIABLES=cons_pc food_pc nonfood_pc house_pc h_services_pc health_pc education_pc 
    clothing_pc comunication_pc personal_pc entertaiment_pc furniture_pc other_pc engels decile 
    DISPLAY=DEFAULT
  /TABLE cons_pc [S][MEAN] + food_pc [S][MEAN] + nonfood_pc [S][MEAN] + house_pc [S][MEAN] + 
    h_services_pc [S][MEAN] + health_pc [S][MEAN] + education_pc [S][MEAN] + clothing_pc [S][MEAN] + 
    comunication_pc [S][MEAN] + personal_pc [S][MEAN] + entertaiment_pc [S][MEAN] + furniture_pc 
    [S][MEAN] + other_pc [S][MEAN] + engels [S][MEAN] BY decile [C]
  /CATEGORIES VARIABLES=decile ORDER=A KEY=VALUE EMPTY=EXCLUDE TOTAL=YES POSITION=AFTER
  /TITLES
    TITLE="Average value of consumption per ca'pita by groups,  Barbados 2016".


GET  FILE='h 01 household_cover_12a_13.sav'.


WEIGHT BY weight2.

* Custom Tables.
CTABLES
  /VLABELS VARIABLES=p0 P1 p2 p0_ext p1_ext p2_ext DISPLAY=DEFAULT
  /TABLE p0 [S][MEAN] + P1 [S][MEAN] + p2 [S][MEAN] + p0_ext [S][MEAN] + p1_ext [S][MEAN] + p2_ext 
    [S][MEAN]
  /TITLES
    TITLE="FGT's expanded to households in Barbados, 2017".

WEIGHT BY weight3.

* Custom Tables.
CTABLES
  /VLABELS VARIABLES=p0 P1 p2 p0_ext p1_ext p2_ext DISPLAY=DEFAULT
  /TABLE p0 [S][MEAN] + P1 [S][MEAN] + p2 [S][MEAN] + p0_ext [S][MEAN] + p1_ext [S][MEAN] + p2_ext 
    [S][MEAN]
  /TITLES
    TITLE="FGT's expanded to persons in Barbados, 2017".

WEIGHT BY weight2.


* Custom Tables.
CTABLES
  /VLABELS VARIABLES=decile quintile poor_extreme poor_all poor hh_size DISPLAY=DEFAULT
  /TABLE decile + quintile + poor_extreme [C] + poor_all [C] + poor BY hh_size [MEAN]
  /CATEGORIES VARIABLES=decile quintile ORDER=A KEY=VALUE EMPTY=EXCLUDE TOTAL=YES POSITION=AFTER
  /CATEGORIES VARIABLES=poor_extreme poor_all poor ORDER=A KEY=VALUE EMPTY=INCLUDE
  /TITLES
    TITLE='Households size by consumption level/poverty, Barabados 2016'.

* Custom Tables.
CTABLES
  /VLABELS VARIABLES=q13_01 q13_02 q13_03 q13_08 q13_09 q13_10 q13_11 q13_13 q13_14 q13_15 q13_16 
    quintile poor_extreme poor_all 
    DISPLAY=DEFAULT
  /TABLE q13_01 [C][COLPCT.COUNT PCT40.1] + q13_02 [C][COLPCT.COUNT PCT40.1] + q13_03 
    [C][COLPCT.COUNT PCT40.1] + q13_08 [C][COLPCT.COUNT PCT40.1] + q13_09 [C][COLPCT.COUNT PCT40.1] + 
    q13_10 [C][COLPCT.COUNT PCT40.1] + q13_11 [C][COLPCT.COUNT PCT40.1] + q13_13 [C][COLPCT.COUNT 
    PCT40.1] + q13_14 [C][COLPCT.COUNT PCT40.1] + q13_15 [C][COLPCT.COUNT PCT40.1] + q13_16 
    [C][COLPCT.COUNT PCT40.1] BY quintile [C] + poor_extreme [C] + poor_all [C]
  /CATEGORIES VARIABLES=q13_01 q13_02 q13_03 q13_08 q13_09 q13_10 q13_11 q13_13 q13_14 q13_15 
    q13_16 ORDER=A KEY=VALUE EMPTY=INCLUDE
  /CATEGORIES VARIABLES=quintile ORDER=A KEY=VALUE EMPTY=EXCLUDE TOTAL=YES POSITION=AFTER
  /CATEGORIES VARIABLES=poor_extreme poor_all ORDER=A KEY=VALUE EMPTY=INCLUDE TOTAL=YES 
    POSITION=AFTER
  /TITLES
    TITLE='House characteristics by consumption level/poverty, Barabados 2016'.

COMPUTE persons_beadroom=   hh_size/q13_19  .
VARIABLE LABELS  persons_beadroom '# of persons per beadroom'.
EXECUTE.

* Custom Tables.
CTABLES
  /VLABELS VARIABLES=persons_beadroom quintile poor_extreme poor_all DISPLAY=DEFAULT
  /TABLE persons_beadroom [MEAN] BY quintile [C] + poor_extreme [C] + poor_all [C]
  /CATEGORIES VARIABLES=quintile ORDER=A KEY=VALUE EMPTY=EXCLUDE TOTAL=YES POSITION=AFTER
  /CATEGORIES VARIABLES=poor_extreme poor_all ORDER=A KEY=VALUE EMPTY=INCLUDE TOTAL=YES 
    POSITION=AFTER
  /TITLES
    TITLE='Persons by beadroom by consumption level/poverty, Barabados 2016'.

* Custom Tables.
CTABLES
  /VLABELS VARIABLES=line_extreme line_moderate DISPLAY=DEFAULT
  /TABLE line_extreme [MEAN] + line_moderate [MEAN].