Create prisoners_dilemma.R