(view original color function here)
Mathematica code:
Animate[
DensityPlot[
Sin[r*Abs[(x + I y)^2]],
{x, -2.5, 2.5}, {y, -2.5, 2.5},
PlotPoints -> 50, Mesh -> False, Frame -> False, ColorFunction -> Hue],
{r,1234.7, 1235.7, .1}]
i went to a show/party last night, god drunk and high and met a really cool boy, but turns out he is 15… eeeesh. it was...