Update readme
Add R script of merging data