* ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; #delimit ; * This says that the semicolon denotes the end of a line of command. All lines must end with semicolons after this; set more 1; *This should stop the pauses; *To keep going regradless of errors, use DO mYFILE, nostop; /* *Feb. 28, 1996 Done using STATA . These are soime Bell Curve regressoins. */ * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; infile int ID AFQT80 AFQT89 zAFQT89 zIQYr89 Wgt90 WASVAB zAge zSES str8 Race4 str8 EdSample byte MoNoWk8 _skip(3) str8 Adult14B str8 Adult14S AgeMarry _skip(2) byte BornWher byte Div5Yrs DOB byte Emp568 byte EmpSchl byte EverWed str8 FinDegre _skip(3) byte IntAge90 byte Jail KInc89 KWage89 _skip(5) str8 Occ90Typ byte Pov89 str8 RelAtt str8 Sample str8 Sex _skip(3) byte Work89 byte YrRndWr zEd90 using nation.csv ; log using bell2,replace; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; encode Race4, gen(race4); drop Race4; encode RelAtt, gen(relatt); drop RelAtt; encode Sex, gen(sex); drop Sex; label list race4; label list relatt; label list sex; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; generate int black =race4 ==1 if race4 ~=. ; generate int hisp =race4 ==2 if race4 ~=. ; generate int OthRace =race4 ==3 if race4 ~=. ; generate int monthly=relatt==1 if relatt ~=. ; generate int wkplus=relatt==6 if relatt ~=. ; generate int 23month=relatt==2 if relatt ~=. ; generate int infreq=relatt==3 if relatt ~=. ; generate int weekly=relatt==4 if relatt ~=. ; * omitted dummy: ; generate int nochurch=relatt==5 if relatt ~=. ; generate int wkly = (relatt==6 or relatt=4) if relatt ~=.; generate int gender=sex==2 if sex ~=. ; generate IQSquare = (zIQYr89+3)^2; generate EdSquare = (zEd90+5.5)^2; generate interact= (zIQYr89+3)*(zEd90+5.5); * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; summarize KInc89 zIQYr89 BornWher zEd90 ; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; regress KInc89 zIQYr89 zEd90 [aweight=Wgt90]; regress KInc89 zIQYr89 zEd90 interact [aweight=Wgt90]; regress KInc89 zIQYr89 IQSquare zEd90 EdSquare [aweight=Wgt90]; regress KInc89 zIQYr89 IQSquare zEd90 EdSquare interact [aweight=Wgt90]; regress KInc89 gender BornWher [aweight=Wgt90]; regress KInc89 zIQYr89 zEd90 rel2 rel3 rel4 rel5 rel6 [aweight=Wgt90]; regress wkly zIQYr89 zEd90 [aweight=Wgt90]; regress nochurch zIQYr89 zEd90 [aweight=Wgt90]; regress KInc89 zIQYr89 zEd90 black hisp OthRace BornWher [aweight=Wgt90]; regress zIQYr89 black hisp OthRace gender BornWher [aweight=Wgt90]; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; save nation1.dta,replace; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--; * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~--;