variable-assignment code snippets in r