set code snippets in r