capture log close 
set logtype text, 
log using hw1.txt, replace 
clear 
set memory 100m 
set more off
use census2, clear
/* A.1 */
describe
/* A2.1 */
sum,d
/* or */
tabstat pop-age, statistics (N mean sd v min max)
/*A2.2*/
gen pov65 = (popurban >=6500000)
tabstat pov65, statistics(mean)
/*A2.3*/
sort region divorce
by region: egen meandivorce = mean(divorce)
list region meandivorce, sepby(region)
/*A2.4*/
gen dr = divorce/marriage
/*A2.5*/
corr divorce popurban if region==1
use wage1, clear
/*c11(i)*/
describe
tabstat educ, s(me mi ma)
/*c11(ii)*/
tabstat wage, s(me mi ma)
/*c11(iii) 56.9 and 184*/
display 184*5.89/56.9
/*c1.1 (v)*/
count if female==1 
log close 
exit