renaming files code snippets in r