Posts tagged: video

[Flash 10 is required to watch video]

This video shows continuous variation in angle (from 0 to Pi) of the connect-the-dots algorithm while keeping all other parameters fixed. Each instant is a valid 2-coloring.

Music: “Derbyshire” by Nerve

Mathematica code:

Manipulate[
ImageCrop[
Graphics[
GraphicsComplex[
Table[
{-(.96)^n*Sin[n*.001 f], .96^n*Cos[n*.001 f]},
{n, 0, 300}],
Polygon[Table[i, {i, 1, 300, 1}]]],
PlotRange -> .1, ImageSize -> 640],
{640, 480}],
{f, 1, 3145, 1}]

jtotheizzoe:

Recursive Drawing

Drawing programs don’t always have a “point”, even if they are fun. Recursive Drawing, however, aims to use a simple and addictive user-interface to explore how drawings could be translated into programming. 

On the surface, it’s a purely fun tool (which you can, and should, play with!) to draw crazy-awesome things like Fibonacci trees (like in the video). But deep down, it’s an experiment in translating visual objects into programming commands. That’s called a spatial or visual programming environment, and it’s a way to disconnect the syntax of programming from the logic and math.

Environments like these also let non-English speakers and young people get introduced to programming skills without having to master the language itself. But if you don’t want to pay attention to all that, it’s just really FUN!

Previously: A dangerously addictive online fluid dynamics simulator and a particle/gravity simulator that really looks more like fireworks.

[Flash 10 is required to watch video]

Music: “Parisian Goldfish (Take Remix)” by Flying Lotus

Watch the rest of the video in sub-par quality here.
When it comes to the rapid movement of unnaturally bright colors Tumblr’s video transcoding seems to work better than both Vimeo’s and YouTube’s!

Mathematica code:

ListAnimate[
Table[
 ImageCrop[
   DensityPlot[
    Sin[(t*.005)*Abs[(x + I y)^2]], {x, -8, 8}, {y, -8, 8},
   PlotPoints -> 20, Mesh -> False, Frame -> False,
   ColorFunction -> Hue, ImageSize -> 668],
   {640, 480}],
 {t, 0, 1780, 1}]
20, AnimationRunning -> False]
[Flash 10 is required to watch video]

Music: “Pattern 3” by Moritz Von Oswald Trio


Mathematica
code:

Animate[
  Graphics[
    Line[
      Table[{-.99^n*Sin[n*a], .99^n*Cos[n*a]}, {n, 0, 1000}]],
  PlotRange -> 0.0918],
{a, 3.18, 2.96}]
[Flash 10 is required to watch video]

Music: “Rained the Whole Time” by Shlohmo


Mathematica
code:

Animate[
  Graphics[
    Line[
     Table[{-Sin[n*a], Cos[n*a]}, {n, 0, 350}]],
  PlotRange -> .672],
{a, 3.2, 3.215}]
[Flash 10 is required to watch video]

Music generated with Otomata!

Continuous variation in the parameter “a” starting at a = 0

Unknown code parameters : r, a(final), s


Visuals created with Mathematica code:

Manipulate[
 Graphics[
  Line[
   Table[
    {-r^n*Sin[n*a], r^n*Cos[n*a]}, {n, 0, s}]],
  PlotRange -> .01], 
 {r, .1, 1}, {a, 0.001, 4*Pi, .00001}, {s, 1, 10000, 1]
[Flash 10 is required to watch video]


Music: “The Star Compass” by Tim Hecker

Created with Mathematica code:

Manipulate[
 Graphics[
  Line[
   Table[
    {-Sin[n*a], Cos[n/a]}, {n, 0, 800}]],
  PlotRange -> 1.3],
{a, 11.396, 11.621, .0001}] 
[Flash 10 is required to watch video]



Music: “The New Anthem” by Jan Jelinek & Computer Soup

Created with Mathematica code:

Manipulate[
 Graphics[
  Line[
   Table[
    {-.999^n*Sin[n*a], .999^n*Cos[n/a]}, {n, 0, 200}]],
  PlotRange -> 1.3],
{a, 3, 3.78, .0001}] 

Music: “Facelift” by Jan Jelinek avec The Exposures

Created with Mathematica code:

Manipulate[
 Graphics[
  Line[
   Table[
    {-*Sin[n*a], Cos[n/a]}, {n, 0, 500}]],
  PlotRange -> 1.3],
{a, .7, .775, .0001}] 

spookyactioncollective:


The secret lives of invisible magnetic fields are revealed as chaotic ever-changing geometries . All action takes place around NASA’s Space Sciences Laboratories, UC Berkeley, to recordings of space scientists describing their discoveries . Actual VLF audio recordings control the evolution of the fields as they delve into our inaudible surroundings, revealing recurrent ‘whistlers’ produced by fleeting electrons . Are we observing a series of scientific experiments, the universe in flux, or a documentary of a fictional world?
.

 (via Magnetic Movie)


This video, by Semiconductor, is an artistic rendering exemplifying the dynamics of electromagnetic phenomenon happening around us and through out the universe. The animations are set to audio from VLF radio-wave recordings produced from real ambient sources such as weather systems, electrical storms, the Earth’s core, the upper atmosphere, and solar wind traveling to us all the way from the Sun.

Also, be sure to check out one of my favorite blogs, spooky(abstr)action, over at spookyactioncollective.tumblr.com where you can find quality posts ranging on topics like science, math, and technology amongst many other intriguing and peculiar things.

[Flash 10 is required to watch video]

This video shows 52 seconds of continuous variation of the parameter a in the code given below. Jump in!

Music: “Pulses” by Steve Reich

r = .98

8.3 ≤ a ≤ 8.6

s = 600

Mathematica code:

Manipulate[
Graphics[
Line[
Table[{-r^n*Sin[n*a], r^n*Cos[n*a]}, {n, 0, s}]],
PlotRange -> .01],
{r, .1, 1}, {a, .001, 4*Pi, .001}, {s, 1, 800, 1}]

An arbitrary point P on a torus (not lying in the xy-plane) can have four circles drawn through it. The first circle is in the plane of the torus and the second is perpendicular to it. The third and fourth circles are called Villarceau circles.

In this video, colors are assigned according to the directions and speeds of the points.