adding in the .Rproj