ゼータ関数の美しいグラフ達

Combtooth \ Requiescat
スクリーンショット__321_ plot[Re[zeta[[0.05*sin[t]*(-1)^t+i/t]]], Im[zeta[[0.05*sin[t]*(-1)^t+i/t]]], [t, 450, 500]]
スクリーンショット__323_ plot[Re[zeta[[0.05*tan[t]*(-1)^t+i/t]]], Im[zeta[[0.05*tan[t]*(-1)^t+i/t]]], [t, 450, 500]]
スクリーンショット__336_ plot[Re[zeta[[0.05*sin[t]*(-1)^t+i/t]]], Im[zeta[[0.05*cos[t]*(-1)^t+i/t]]], [t, 450, 500]]
スクリーンショット__335_ plot[Re[zeta[[0.05*sin[t]*(-1)^t+i/t]]], Im[zeta[[0.05*arccos[t]*(-1)^t+i/t]]], [t, 450, 500]]
画像5
画像6
画像7
画像8
画像9
画像10
画像11
画像12
スクリーンショット__254_
スクリーンショット__250_
スクリーンショット__368_ 適当な多角数を入れてみた
スクリーンショット__372_ フィボナッチ数列の一般項を入れてみた
スクリーンショット__376_ お腹の胎児に見えなくもない？
スクリーンショット__379_