High-res: 800x800
Mathematica code:
  DensityPlot[    Sin[215*Abs[(x + I y)^-1]],     {x, -2.5, 2.5}, {y, -2.5, 2.5},   PlotPoints -> 36, Mesh -> False, Frame -> False, ColorFunction -> Hue]

High-res: 800x800

Mathematica code:

  DensityPlot[
Sin[215*Abs[(x + I y)^-1]],
{x, -2.5, 2.5}, {y, -2.5, 2.5},
PlotPoints -> 36, Mesh -> False, Frame -> False, ColorFunction -> Hue]
 
  1. istuckin reblogged this from nervepinch
  2. nervepinch reblogged this from thirstyear
  3. 2468poprocks reblogged this from thirstyear
  4. thirstyear reblogged this from intothecontinuum
  5. diagiraldo reblogged this from intothecontinuum
  6. d4zed-and-confused reblogged this from intothecontinuum
  7. sahajp98 reblogged this from intothecontinuum
  8. blunts-and-ink reblogged this from psychedelic-view
  9. psychedelic-view reblogged this from intothecontinuum
  10. intothecontinuum posted this