渋谷 慶一郎+東 浩紀 feat. 初音ミク 『イニシエーション』 (by sonymusicnetwork)
Imagine you had a robot, consisting of series of arms. They would be of same length, and each one would be attached to the end of the previous one, so it could rotate in the same 2d plane. If each joint were given some angular speed, what would the curve traced by the end-most point look like?
Well, here are several examples. The ellipse is expected, and boring, but some other curves are beatiful, and complicated. Some look like they were traced with a spirograph.
Some of these curves are epitrochoids, but I’m not sure what their general classification would be.
ハイスイノナサ”地下鉄の動態” (by zankyorecord)
Mathematica code:
ListAnimate[
Table[
ImageCrop[
Graphics[
{Opacity[1, White],
Line[
Table[
{-.99^n*Sin[n*.533], .99^n*Cos[n*.533]},
{n, 0, 700}]]},
PlotRange -> p, ImageSize -> 700, Background -> Black],
{500, 700}],
{p, 0.1637, .4711, .01}]]
psql:
PEW PEW WHIZ BANG POP
BUD DUB (by KOKOFREAKBEAN)
Visuals by Kokofreakbean are overwhelming. They’re paced for victims of over-mograph stimulation. However, as an aficionado of digital effects I find them fascinating, tongue-in-cheek blasts of color palette excellence.
Live better!





