Merge Raster And Shapefile R