system code snippets in r