moon phases (for the first 50), slightly better

GraphicsGrid of MoonPhase icons, each one representing the moon phase on a birthday. over each icon is a number in futura font, denoting which birthday said moon phase was. across the top is the title "first 50 birthday moon phases"
alt text
GraphicsGrid of MoonPhase icons, each one representing the moon phase on a birthday. over each icon is a number in futura font, denoting which birthday said moon phase was. across the top is the title "first 50 birthday moon phases"
tried rendering https://mltshp.com/p/1RMG2 again, with a few fixes.

still renders the first few digits a wonky size, but i'm not putting any more energy into this today.

WL code to generate the basic image grid:
GraphicsGrid[
Partition[
Table[ImageCompose[
Rasterize[MoonPhase[DateObject[{*(yourbirthyear)* + n, *(yourbirthmonth)*, *(yourbirthday)*, *(yourbirthhour)*, *(yourbirthminute)*}], "Icon"],
RasterSize -> 500, ImageSize -> 500],
Rasterize[Text[Style[n, FontFamily -> "Futura"]],
RasterSize -> 100, ImageSize -> 100, Background -> None]], {n,
50}], 5]]

Post URL

https://mltshp.com/p/1RMGL

In These Shakes

  • Post to Tumblr