Pixel Value Extraction by Polygon in R