multi-variable code snippets in r