*******This txt file should be run using SPSS statistics as a syntax file (*.sps)
*******institutional level

**** figure 1

T-TEST GROUPS=project.d(0 1)
  /MISSING=ANALYSIS
  /VARIABLES=TotalStudentEnrollment  @2011EndowmentAssetsx$1000 
     @2010FederalResearchx$1000  @2011AcademyMembers
  /CRITERIA=CI(.95).


**table 1 model 1

LOGISTIC REGRESSION VARIABLES project.d
  /METHOD=ENTER  Federal2010decile  studentenrollinthousands   @2011AcademyMembers Endowd2011decile  centers
  /CRITERIA=PIN(.05) POUT(.10) ITERATE(20) CUT(.5).


****table 1 model 2

GENLIN Number_projects BY centers (ORDER=ASCENDING) WITH studentenrollinthousands 
    @2011AcademyMembers Endowd2011decile Federal2010decile
  /MODEL centers studentenrollinthousands @2011AcademyMembers Endowd2011decile Federal2010decile 
    INTERCEPT=YES
 DISTRIBUTION=POISSON LINK=LOG
  /CRITERIA METHOD=FISHER(1) SCALE=1 COVB=MODEL MAXITERATIONS=100 MAXSTEPHALVING=5 
    PCONVERGE=1E-006(ABSOLUTE) SINGULAR=1E-012 ANALYSISTYPE=3(WALD) CILEVEL=95 CITYPE=WALD 
    LIKELIHOOD=FULL
  /MISSING CLASSMISSING=EXCLUDE
  /PRINT CPS DESCRIPTIVES MODELINFO FIT SUMMARY SOLUTION.


**table 1 model 3

LOGISTIC REGRESSION VARIABLES success.d
  /METHOD=ENTER  Number_projects  Federal2010decile  studentenrollinthousands   @2011AcademyMembers  Endowd2011decile  centers
  /CRITERIA=PIN(.05) POUT(.10) ITERATE(20) CUT(.5).


*****These syntax were used to create Table 2
****Running these require installing the PROCESS macro by Hayes (2013)
****Due to the fact the algorithm dependes on a random component, variations in standard errors and confidence intervals are possibles




PROCESS 
  y=success.d
  /x=Federal2010decile
  /m=Number_projects
    /cov=Endowd2011decile centers @2011AcademyMembers studentenrollinthousands
  /decimals=F10.4
  /boot=5000
  /conf=95
  /model=4.



PROCESS 
  y=success.d
  /x=Endowd2011decile
  /m=Number_projects
    /cov=Federal2010decile centers @2011AcademyMembers studentenrollinthousands
  /decimals=F10.4
  /boot=5000
  /conf=95
  /model=4.

PROCESS 
  y=success.d
  /x=studentenrollinthousands
  /decimals=F10.4
  /m=Number_projects
    /cov=Federal2010decile Endowd2011decile centers @2011AcademyMembers 
  /boot=5000
  /conf=95
  /model=4.

PROCESS 
  y=success.d
  /x=@2011AcademyMembers
  /decimals=F10.4
  /m=Number_projects
    /cov=Federal2010decile Endowd2011decile studentenrollinthousands centers  
  /boot=5000
  /conf=95
  /model=4.


PROCESS 
  y=success.d
  /x=centers
  /decimals=F10.4
  /m=Number_projects
    /cov=Federal2010decile Endowd2011decile studentenrollinthousands @2011AcademyMembers 
  /boot=5000
  /conf=95
  /model=4.







***individual level data

*****models in table 3
*** Table 3 model 1

REGRESSION
  /MISSING LISTWISE
  /STATISTICS COEFF OUTS CI(90) R ANOVA COLLIN TOL
  /CRITERIA=PIN(.05) POUT(.10)
  /NOORIGIN 
  /DEPENDENT  pledged
  /METHOD=ENTER life exact video.d  MAXRANKNEW MINRANKNEW numberfoundersnew  decilemaxresearch.


***Table 3 model 2

REGRESSION
  /MISSING LISTWISE
  /STATISTICS COEFF OUTS R ANOVA COLLIN TOL
  /CRITERIA=PIN(.05) POUT(.10)
  /NOORIGIN 
  /DEPENDENT  pledged.goal.ratio
  /METHOD=ENTER life exact video.d  MAXRANKNEW MINRANKNEW numberfoundersnew  decilemaxresearch.


****variable setup institutional level

RECODE Number_projects (0=0) (1 thru Highest=1) INTO project.d.
EXECUTE.

compute studentenrollinthousands =  TotalStudentEnrollment / 1000 .
execute .


RECODE region_manual (1=1) (6=1) (5=1) (ELSE=0) INTO centers.
EXECUTE.

recode  success (0=0) (else=1) into success.d .
execute  .





************************variables setup individual level

COMPUTE Academic_Rank_Max1=MAX(Academic_Rank1, Academic_Rank2, Academic_Rank3, Academic_Rank4, Academic_Rank5, Academic_Rank6, Academic_Rank7). 
EXECUTE.
 

compute Academic_Rank_Max1aca = Academic_Rank_Max1 .
IF (Academic_Rank_Max1=1) Academic_Rank_Max1aca= 999 .
execute .






recode  Academic_Rank1 Academic_Rank2 Academic_Rank3 Academic_Rank4 Academic_Rank5 Academic_Rank6 Academic_Rank7 Academic_Rank8 Academic_Rank9 Academic_Rank10 
 (1=1) (2=1) (3=1) (4=1) (5=1) (999=1) (6=2) (7=3) (8=4) into rankr1 rankr2 rankr3 rankr4 rankr5 rankr6 rankr7 rankr8 rankr9 rankr10  .
execute .

VALUE LABELS
rankr1 rankr2 rankr3 rankr4 rankr5 rankr6 rankr7 rankr8 rankr9 rankr10
1 'junior/norank/unknown/student/postdoc/adjunct'
2 'assistant prof'
3 'associate prof'
4 'full prof' .
execute .


compute MAXRANKNEW = max (rankr1, rankr2, rankr3, rankr4, rankr5, rankr6, rankr7, rankr8, rankr9, rankr10) .
Compute MINRANKNEW = min (rankr1, rankr2, rankr3, rankr4, rankr5, rankr6, rankr7, rankr8, rankr9, rankr10) .

execute .

VALUE LABELS
maxranknew minranknew
1 'junior/norank/unknown/student/postdoc/adjunct'
2 'assistant prof'
3 'associate prof'
4 'full prof' .
execute .


DATASET ACTIVATE DataSet1.
COUNT numberfoundersnew=rankr1 rankr2 rankr3 rankr4 rankr5 rankr6 rankr7 rankr8 rankr9 rankr10 (1 
    thru 4).
EXECUTE.





compute maxresearch= MAX (ASU_Federal_Research_Constant_1, ASU_Federal_Research_Constant_2, ASU_Federal_Research_Constant_3, ASU_Federal_Research_Constant_4, ASU_Federal_Research_Constant_5,
ASU_Federal_Research_Constant_6, ASU_Federal_Research_Constant_7, ASU_Federal_Research_Constant_8, ASU_Federal_Research_Constant_9, ASU_Federal_Research_Constant_10) .
execute .

RANK VARIABLES=maxresearch (A)
  /NTILES(10) into decilemaxresearch
  /PRINT=YES
  /TIES=MEAN.








compute  decilemaxresearch.d =  decilemaxresearch/10 .
compute numberfoundersnew.d = numberfoundersnew/10 .
compute MINRANKNEW.d = MINRANKNEW/4 .
compute  MAXRANKNEW.d =  MAXRANKNEW/4 .
execute .



REGRESSION
  /MISSING LISTWISE
  /STATISTICS COEFF OUTS CI(90) R ANOVA COLLIN TOL
  /CRITERIA=PIN(.05) POUT(.10)
  /NOORIGIN 
  /DEPENDENT  pledged
  /METHOD=ENTER life exact video.d  MAXRANKNEW MINRANKNEW numberfoundersnew  decilemaxresearch.



REGRESSION
  /MISSING LISTWISE
  /STATISTICS COEFF OUTS R ANOVA COLLIN TOL
  /CRITERIA=PIN(.05) POUT(.10)
  /NOORIGIN 
  /DEPENDENT  pledged.goal.ratio
  /METHOD=ENTER life exact video.d  MAXRANKNEW.d MINRANKNEW.d numberfoundersnew.d  decilemaxresearch.d.