Transpose or mirror SpatialPoints object while retaining original extent - R

Question

Is there a way to mirror or transpose a SpatialPoints object in R? I\'m interested in creating a mirrored example of some points using the same extent or X/Y limits as in or