source("drift.R") source("infiniteIPD.R") source("infiniteIPDR.R") source("gtft.R") source("pavlov.R") # it 2N p rep drift(20,10,0.5,10) drift(20,100,0.5,10) #Game theory gtft(100,100,F) gtft(100,100,T) pavlov(100,100,T)