ラマヌジャンタウシータ関数からgenerateされたきらびやかな複素イメージ!
良いクリスマスを!
オマケ Mathematica Code
ComplexPlot[
RamanujanTauTheta[q Sin[q^2]], {q, -1.5 - 1.5 I, 1.5 + 1.5 I},
Frame -> None,
Sequence[ColorFunction -> "CyclicLogAbsArg", PlotPoints -> 800,
Method -> {"RasterSize" -> 800}, Exclusions -> {}]]