fixed the CP extreme code at the end of the file

Also, I added an Rproj file. You can load the Rproj with Rstudio, and
it will set up the working directory correctly.