************************************
************************************
***MEASURES OF CENTRAL TENDENCY (chapter 3)
***MEASURES OF DISPERSION (chapter 4)
************************************
************************************

************************************
***OPENING COMMANDS
************************************
***Clear memory
clear all

***Start saving results window
log using "C:\course\progs\Stata02.log", replace text // Windows
log using "/course/progs/Stata02.log", replace text // Macintosh

***Open data (created in a previous class)
use "C:\course\data\Stata01.dta", clear // Windows
use "/course/data/Stata01.dta", clear // Macintosh

************************************
***TABLES AND GRAPHS
************************************
***Sex
table sex [aweight=wtssall], c(min conrinc p25 conrinc p50 conrinc p75 conrinc max conrinc)
table sex [aweight=wtssall], c(iqr conrinc sd conrinc mean conrinc)

graph box conrinc [aweight=wtssall], over(sex) ytitle(Individual income in constant dollars)

***Age group
table agegr1 [aweight=wtssall], c(min conrinc p25 conrinc p50 conrinc p75 conrinc max conrinc)
table agegr1 [aweight=wtssall], c(iqr conrinc sd conrinc mean conrinc)

graph box conrinc [aweight=wtssall], over(agegr1) ytitle(Individual income in constant dollars)

***Race/ethnicity
table raceeth [aweight=wtssall], c(min conrinc p25 conrinc p50 conrinc p75 conrinc max conrinc)
table raceeth [aweight=wtssall], c(iqr conrinc sd conrinc mean conrinc)

graph box conrinc [aweight=wtssall], over(raceeth) ytitle(Individual income in constant dollars)

***Sex and age group
graph box conrinc [aweight=wtssall], over(sex) over(agegr1) ytitle(Individual income in constant dollars)
graph box conrinc [aweight=wtssall], over(agegr1) over(sex) ytitle(Individual income in constant dollars)

***Sex and race/ethnicity
graph hbox conrinc [aweight=wtssall], over(sex) over(raceeth) ytitle(Individual income in constant dollars)
graph hbox conrinc [aweight=wtssall], over(raceeth) over(sex) ytitle(Individual income in constant dollars)

***Age group and race/ethnicity
graph hbox conrinc [aweight=wtssall], over(agegr1) over(raceeth) ytitle(Individual income in constant dollars)
graph hbox conrinc [aweight=wtssall], over(raceeth) over(agegr1) ytitle(Individual income in constant dollars)

***Sex, age group, and race/ethnicity
graph hbox conrinc [aweight=wtssall], over(sex) over(agegr1) over(raceeth) ytitle(Individual income in constant dollars)

************************************
***CLOSING COMMANDS
************************************
***Save log
log close