Revising the R file