Initial scripts for infinite sites model with SIR population history