join operations code snippets in r