Changes to R file