Moved file into R folder