intothecontinuum:

The second GIF is supposed to simulate what the first GIF may look like if viewed with your monitor angled downwards. It is the same as the first except the brightness was increased using Photoshop.

Mathematica code:

R[n_] := (SeedRandom[n]; RandomReal[])
G[A_, s_, c_, T_, x_] := A*T*Exp[-(x - c)^2/s]

ListAnimate[
Show[
Table[
Plot[
100 - n +
Sum[G[.05, 6, 100*R[n],
Sum[G[1, .01, k - R[2 n], 1, m/100 + t],
{k, -3, 3, 1}],
x],
{n, 1, 100, 1}],
{x, -10, 110}],
PlotStyle -> Directive[Black], PlotRange -> {{-10, 110}, {0, 100.5}},
Filling -> Axis, FillingStyle -> White, Axes -> False, AspectRatio -> Full,
ImageSize -> {500, 700}],
{n, 0, 100, 1}]],
{t, 0, .95, .5}, AnimationRunning->False]
  1. liianardo reblogged this from meluhh
  2. meluhh reblogged this from intothecontinuum
  3. gaysinthemilitary reblogged this from -hyprshkk
  4. alano5 reblogged this from intothecontinuum
  5. nervepinch reblogged this from thirstyear
  6. -hyprshkk reblogged this from thirstyear
  7. thirstyear reblogged this from intothecontinuum
  8. lobonitoesanodino reblogged this from intothecontinuum
  9. shauneezy reblogged this from intothecontinuum
  10. blanchefessesetles7mains reblogged this from intothecontinuum
  11. finding-tino reblogged this from mysweetinfinities
  12. mysweetinfinities reblogged this from intothecontinuum
  13. yvinosiop reblogged this from intothecontinuum
  14. sodafabric reblogged this from intothecontinuum
  15. ancienamour reblogged this from nordic0
  16. borethrough reblogged this from intothecontinuum
  17. refrom reblogged this from snowgroove