As If.

January 1st, 2012 at 8:33PM

$intothecontinuum: Mathematica code: Animate[ DensityPlot[ Sin[100*Abs[(x + I y)^n]], {x, -2.5, 2.5}, {y, -2.5, 2.5}, PlotPoints -> 30, Mesh -> False, Frame -> False, ColorFunction -> Hue], {n, .7, .74}]$

intothecontinuum:

Mathematica code:

Animate[
  DensityPlot[
    Sin[100*Abs[(x + I y)^n]], 
    {x, -2.5, 2.5}, {y, -2.5, 2.5}, 
  PlotPoints -> 30, Mesh -> False, Frame -> False, ColorFunction -> Hue],
 {n, .7, .74}]

gonzopix reblogged this from intothecontinuum
shiku22 reblogged this from intothecontinuum
smallcomic liked this
wrec liked this
glared liked this
creativandolxxxv liked this
kregholt liked this
evilfairyfromouterspace liked this
evilfairyfromouterspace reblogged this from intothecontinuum
amy-yes reblogged this from intothecontinuum
offthecob liked this
psykzz liked this
neuroticjellybeans reblogged this from intothecontinuum
the-cool-nerd reblogged this from enkiseshat
cmprtmntlr reblogged this from intothecontinuum
thekevinpaul liked this
amy-yes liked this
neonpi liked this
enkiseshat reblogged this from intothecontinuum
n00bjesus liked this
inanu liked this
revolution-of-consciousness reblogged this from intothecontinuum
cooljava liked this
metaphysicalthought reblogged this from intothecontinuum
intothecontinuum posted this

30 notes Source: intothecontinuum

Short URL for this post: http://tmblr.co/Z-0gAxE7InlE