Create replication.R