GET DATA  /TYPE = TXT
 /FILE = '[INSERT PATH AND FILE NAME]'
 /DELCASE = LINE
 /DELIMITERS = " "
 /ARRANGEMENT = DELIMITED
 /FIRSTCASE = 2
 /IMPORTCASE = ALL
 /VARIABLES =
 id F2.0
 gender F1.0
 msi F2.0
 das F3.0
 sex F2.0
 afc F2.0
 infidelity F1.0
 .

*** Change sex to be 0/1  .
COMPUTE gender = gender - 1 .
EXECUTE .

*** Set value labels for categorical variables .
VALUE LABELS gender 0 'Wife' 1 'Husband'
  /infidelity 0 'No infidelity' 1 'Infidelity' .

*** Fit Poisson model - requires version 15 of SPSS .
* Generalized Linear Models.
GENLIN
  msi
  BY gender infidelity
  (ORDER=DESCENDING)
  WITH das sex afc
 /MODEL
  gender infidelity das sex afc infidelity*das
  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 CILEVEL=95 LIKELIHOOD=FULL
 /MISSING CLASSMISSING=EXCLUDE
 /PRINT CPS DESCRIPTIVES MODELINFO FIT SUMMARY SOLUTION(EXPONENTIATED).

*** Fit Negative Binomial model - requires version 15 of SPSS .
* Generalized Linear Models.
GENLIN
  msi
  BY gender infidelity
  (ORDER=DESCENDING)
  WITH das sex afc
 /MODEL
  gender infidelity das sex afc infidelity*das
  INTERCEPT=YES
  DISTRIBUTION=NEGBIN(1)
  LINK=LOG
 /CRITERIA METHOD=FISHER(1) SCALE=1 COVB=MODEL
  MAXITERATIONS=100 MAXSTEPHALVING=5
  PCONVERGE=1E-006(ABSOLUTE)
  SINGULAR=1E-012
  ANALYSISTYPE=3 CILEVEL=95 LIKELIHOOD=FULL
 /MISSING CLASSMISSING=EXCLUDE
 /PRINT CPS DESCRIPTIVES MODELINFO FIT SUMMARY SOLUTION(EXPONENTIATED).