----------------------------------------------------------------------------------------------
      name:  <unnamed>
       log:  /Users/jbpetkun/Dropbox/India Pollution/India Pollution - 01102014/Log/AppFigure1
> 1_01102014.txt
  log type:  text
 opened on:  26 Jan 2014, 18:25:00

. 
. **************************************
. * Figure 3A. Kernel Densities of Ambient Air Quality
. 
. *** Air ***
. cd "`mypath'Output/AF1"
/Users/jbpetkun/Dropbox/India Pollution/India Pollution - 01102014/Output/AF1

. use "`mypath'Data/Air Data/Intermediate Data/e_airpol_city.dta", clear

. 
. kdensity e_spm_mean if year < 1991, title("") note("") ///
>         addplot(kdensity e_spm_mean if year > 2003, lwidth(medthick) lpattern(dash)) ///
>         xtit("Mean PM", margin(medsmall)) legend(rows(1) label(1 "1987-1990") label(2 "2004-
> 2007")) ///
>         scheme(s1mono) saving(kdens_spm.gph, replace)
(note: file kdens_spm.gph not found)
(file kdens_spm.gph saved)

. 
. kdensity e_so2_mean if year < 1991, title("") note("") lwidth(medthick) ///
>         addplot(kdensity e_so2_mean if year > 2003, lwidth(medthick) lpattern(dash)) ///
>         xtit("Mean SO2", margin(medsmall)) legend(rows(1) label(1 "1987-1990") label(2 "2004
> -2007")) ///
>         scheme(s1mono) saving(kdens_so2.gph, replace)
(note: file kdens_so2.gph not found)
(file kdens_so2.gph saved)

. 
. kdensity e_no2_mean if year < 1991, title("") note("") lwidth(medthick) ///
>         addplot(kdensity e_no2_mean if year > 2003, lwidth(medthick) lpattern(dash)) ///
>         xtit("Mean NO2", margin(medsmall)) legend(rows(1) label(1 "1987-1990") label(2 "2004
> -2007")) ///
>         scheme(s1mono) saving(kdens_no2.gph, replace)
(note: file kdens_no2.gph not found)
(file kdens_no2.gph saved)

. 
. graph combine kdens_spm.gph kdens_so2.gph kdens_no2.gph, cols(1) scheme(s1mono) ysize(5) xsi
> ze(2)

.         graph export "kdens_air.eps", replace   
(note: file kdens_air.eps not found)
(file kdens_air.eps written in EPS format)

. 
. erase kdens_spm.gph

. erase kdens_so2.gph

. erase kdens_no2.gph

.         
. ***************************************
. * Figure 3B. Kernel Density Graphs of Surface Water Quality
.         
. *** Water ***
. use "`mypath'Data/Water Data/Final Data/india_waters_cityyear.dta", clear

.         
. kdensity bod if year < 1990 & bod < 20, title("") note("") lwidth(medthick) ///
>         addplot(kdensity bod if year > 2001 & bod < 20, lwidth(medthick) lpattern(dash)) ///
>         xtit("Mean BOD", margin(small)) legend(rows(1) label(1 "1986-1989") label(2 "2002-20
> 05")) ///
>         scheme(s1mono) saving(kdens_bod.gph, replace)
(note: file kdens_bod.gph not found)
(file kdens_bod.gph saved)

. 
. kdensity lnfcoli if year < 1990, title("") note("") lwidth(medthick) ///
>         addplot(kdensity lnfcoli if year > 2001, lwidth(medthick) lpattern(dash)) ///
>         xtit("Mean Ln(FColi)", margin(small)) legend(rows(1) label(1 "1986-1989") label(2 "2
> 002-2005")) ///
>         scheme(s1mono) saving(kdens_lnfcoli.gph, replace)
(note: file kdens_lnfcoli.gph not found)
(file kdens_lnfcoli.gph saved)

. 
. kdensity do if year < 1990, title("") note("") lwidth(medthick) xlab(0 4 8 12) ///
>         addplot(kdensity do if year > 2001, lwidth(medthick) lpattern(dash)) ///
>         xtit("Mean DO", margin(small)) legend(rows(1) label(1 "1986-1989") label(2 "2002-200
> 5")) ///
>         scheme(s1mono) saving(kdens_do.gph, replace)
(note: file kdens_do.gph not found)
(file kdens_do.gph saved)

. 
. graph combine kdens_bod.gph kdens_lnfcoli.gph kdens_do.gph, cols(1) scheme(s1mono) ysize(5) 
> xsize(3)    

.         graph export "kdens_water.eps", replace                 
(note: file kdens_water.eps not found)
(file kdens_water.eps written in EPS format)

. 
. erase kdens_bod.gph

. erase kdens_lnfcoli.gph

. erase kdens_do.gph

. ********************************************
. * Figure 3C. Kernel Density Graph of Infant Mortality
. 
. *** Infant Mortality ***
. u "`mypath'Data/Infant Mortality/IM City/Final Data/im_air.dta", clear

. joinby state city year using "`mypath'Data/Infant Mortality/IM City/Final Data/im_water.dta"
> , unmatched(both)

. 
. keep if c_IM<.
(2392 observations deleted)

. 
.         
. kdensity c_IM if year < 1991 & c_IM < 52.8, title("") note("") lwidth(medthick) ///
>         addplot(kdensity c_IM if year > 2000 & c_IM < 52.8, lwidth(medthick) lpattern(dash))
>  ///
>         xtit("Mean IM Rate", margin(small)) legend(rows(1) label(1 "1987-1990") label(2 "200
> 1-2004")) ///
>         scheme(s1mono) saving(kdens_im.gph, replace)
(note: file kdens_im.gph not found)
(file kdens_im.gph saved)

. 
. graph export "kdens_im.eps", replace
(note: file kdens_im.eps not found)
(file kdens_im.eps written in EPS format)

. erase kdens_im.gph

. 
. log close
      name:  <unnamed>
       log:  /Users/jbpetkun/Dropbox/India Pollution/India Pollution - 01102014/Log/AppFigure1
> 1_01102014.txt
  log type:  text
 closed on:  26 Jan 2014, 18:25:15
----------------------------------------------------------------------------------------------
