image-processing code snippets in r