purrr code snippets in r