Added example data file and R script.