powered by
Transform Polygon into Raycoords
transform_points_custom_crs(sf_object, orig_extent, new_extent)