* Note: This file manipulates the datafile "2018.10.02 Assistant Professors.dta" to produce the results for assistant professors
* in [citation]. 
clear all
use "[path]\2018.10.02 Assistant Professors.dta"
set more off
log using "[path]\2018.10.02 Assistant Professors.log", replace
log off

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Drop the University of Texas - Austin because years because they are missing from recent years of the ASA Guide to Graduate Programs.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

drop if job_dept=="Texas"

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate an "era" variable that groups years that people started their first jobs into 3-year increments.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

gen era=.
replace era=1 if job_yr>=1991 & job_yr<=1993
replace era=2 if job_yr>=1994 & job_yr<=1996
replace era=3 if job_yr>=1997 & job_yr<=1999
replace era=4 if job_yr>=2000 & job_yr<=2002
replace era=5 if job_yr>=2003 & job_yr<=2005
replace era=6 if job_yr>=2006 & job_yr<=2008
replace era=7 if job_yr>=2009 & job_yr<=2011
replace era=8 if job_yr>=2012 & job_yr<=2014
replace era=9 if job_yr>=2015 & job_yr<=2017

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate measures of number of publications that disregard order of authorship.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

gen job1_asr= job1_asr1+job1_asr2
gen job1_peer= job1_peer1+job1_peer2
gen job1_chap= job1_chap1+job1_chap2
gen job1_other= job1_other1+job1_other2
gen job1_total= job1_total1+job1_total2

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate Figure 1a: Number of new assistant professors by year (as era).
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

log on
tab era
log off

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate Figure 1b: Number of new assistant professors by department.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

log on
tab job_dept
log off

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate Figure 3a: Number of publications, by era and type of publication.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

log on
bysort era: summ job1_asr job1_peer job1_chap job1_other 
log off

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate Figure 6a: Annual percentage of new assistant professors in the top 21 departments who had a gap of one or more years 
*      between completing their PhD and starting their first assistant professor positions.
* Generate Figure 6b: Mean number of gap years among those with any such gaps
* Generate Figure 7: Number of publications, by era, type of publication, and whether person had any gap years.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

* Create an indicator of whether there was any gap between PhD year and year of starting first assistant professor position
gen anygap=0
replace anygap=1 if gap>=1 & gap<=9

* Figure 6a
log on
bysort era: summ anygap 
log off

* Figure 6b
log on
bysort era: summ gap if anygap==1
log off

* Figure 7
log on
bysort anygap era: summ job1_asr job1_peer job1_chap job1_other 
log off


*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate Figure 11a: Number of FIRST AUTHORED publications, by era and type of publication.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

log on
bysort era: summ job1_asr job1_peer job1_chap job1_other 
log off

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate Figure 12: Percentage of new assistant professors who are female
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

log on
tab era sex, row nof
log off

*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
* Generate Figure 13: Number of publications, by era, type of publication, and gender
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.
*************************************************************************************************************************************************.

log on
bysort sex era: summ job1_asr job1_peer job1_chap job1_other 
log off

log close