'Replication of Hepworth and West 1988 JPSP
genr resid=na

smpl 1882 1930
'series 1 equation: the base-10 log of anti-black lynchings
'Note that this model fails both ARCH and White tests of heteroscedasticity
equation west_s1.LS  LYNBLK1 C YR YR2 MA(1)
genr west1=resid
genr resid=na

'series 3 equation: the base-10 log of all lynchings
equation west_s3.LS LYNTOT1 C YR YR2 MA(1)
genr west3=resid
genr resid=na

'series 4 equation: Ayres index of economic performance
equation west_s4.LS AYRES C MA(5)
genr west4=resid
genr resid=na

'series 6 equation: log of cotton prices
equation west_s6.LS LCOTTON C YR YR2 YR3 YR4 MA(1)
genr west6=resid
genr resid=na

'-----------------------------------------------------------------------------
'alternative series: Green, Glaser, and Rich 1997
'-----------------------------------------------------------------------------
'series 1a equation: the NUMBER of anti-black lynchings
equation west_s1a.LS LYNCHBLK C YR YR2 AR(1)
genr west1a=resid
genr resid=na

'series 1d equation: the NUMBER of anti-black lynchings w/o trend
equation west_s1d.LS LYNCHBLK C  AR(1)
genr west1d=resid
genr resid=na

'series 1f equation: the NUMBER of anti-black lynchings INCIDENTS
equation west_s1f.LS bookbevt C yr yr2 AR(1)
genr west1f=resid
genr resid=na

'-----------------------------------------------------------------------------
'extending the series through Great Depression
'-----------------------------------------------------------------------------
smpl 1882 1938

'series 1c equation: the log-10+1 of anti-black lynchings
equation west_s1c.LS LLYNBLK52 C YR YR2 AR(1) ma(6)
genr west1c=resid
genr resid=na

'series 1e equation: the number of anti-black lynchings
equation west_s1e.LS LYNCHBLK52 C YR  AR(1) ma(3)
genr west1e=resid
genr resid=na

'series 4a equation: Ayres index
equation west_s4a.LS AYRES C AR(1) YR YR2 MA(5)
genr west4a=resid
genr resid=na

'series 6a equation: log of cotton prices
'Note: this indicator fails a White test of heteroscedasticity
equation west_s6a.LS LCOTTON C  AR(1) YR YR2
genr west6a=resid
genr resid=na

'generate another (white) cotton series: percentage growth over prev yr
'Note: this indicator passes White test of heteroscedasticity at p=.05
genr pctcotton=100*(cotton/cotton(-1)-1)