Update replication.R

From AP - regressions for table 3