Add replication
Add R script file