First commit of edited copy of R file.