Added R file & tidydata file