Andy added an extra .r file

mainly so I work on the sampling process on different computers