Message Boards Message Boards

[GIF] Canis (Circle transformation)

GROUPS:

Circle transformation

Canis

I've been playing around lately with stereographic projection and Möbius transformations of the circle. This is neither stereographic projection nor a Möbius transformation, but it came out of the same collection of ideas.

I start with 32 equally spaced points on the equator of the sphere. Now, rotate these points around the axis $(1,0,1)$ and project back down to the equator along the meridian passing through the point: the result is the above animation (after dropping the last coordinate and treating the resulting points as living in the plane).

And here's the full 3-D picture showing the rotations and the projection map; the dark points are the rotating points, the light points are the points on the equator that I'm projecting to, and the thin lines show the meridians:

Tilt and project

Source code:

SphereToCircle[p_] := {Cos[#], Sin[#], 0} &[ToSphericalCoordinates[p][[3]]];

RotateAndProject[p_, θ_, w_] := SphereToCircle[RotationTransform[θ, w][p]];

With[{n = 32, cols = RGBColor /@ {"#DDFEE4", "#132F2B"}},
 Manipulate[
  Graphics[
   {PointSize[.02], cols[[1]],
    Point /@ 
     Table[RotateAndProject[{Cos[θ], Sin[θ], 0}, t, {1, 0, 1}][[;; 2]], 
        {θ, 0, 2 π - 2 π/n, 2 π/n}]},
   PlotRange -> Sqrt[2], ImageSize -> 540, Background -> cols[[-1]]],
  {t, 0, 2 π}]
 ]
POSTED BY: Clayton Shonkwiler
Answer
1 month ago

enter image description here - Congratulations! This post is now a Staff Pick! Thank you for your wonderful contributions. Please, keep them coming!

POSTED BY: Moderation Team
Answer
1 month ago

Group Abstract Group Abstract