s2_centroid() and s2_centroid_agg() should normalize points (or PointGeography() should normalize them on input)

[paleolimbot]

This affects a distance calculation (and probably other point operations:

library(s2)

geog <- as_s2_geography(c("POINT (45.867 11.972)", "POINT (45.867 11.972)"))
centroid <- s2_centroid_agg(geog)

s2_distance(geog, centroid)
#> [1] 6671706 6671706
s2_distance(geog, s2_as_text(centroid))
#> [1] 0 0

^{Created on 2021-06-04 by the reprex package (v2.0.0)}