deduplication code snippets in r