initial changes to the .R file