Mathematica code (.nb) from The efficacy of good genes sexual selection under environmental change

.nb version of the mathematica code supporting this study