Added R script to analyse HAR