Algorithmic Art

luxarchitek: I’ve been fascinated and borderline obsessed with...

Fri, 15 Feb 2013 10:49:33 -0500

I’ve been fascinated and borderline obsessed with cymatics over the past few months. Which is the idea that certain frequencies can resonate and cause 3D forms and pattern symmetry. As my own personal first processing project from scratch I developed a sketch that simulated this idea. Controlled by iPad using OSC, minim library and the Lemur app.

Feeling pretty accomplished with the first draft.

luccica: hekuli: spores-1inv.p5

Mon, 07 Jan 2013 21:40:28 -0500

luccica:

hekuli: spores-1inv.p5

luccica: hekuli: spores-1inv.p3

Mon, 07 Jan 2013 21:20:27 -0500

luccica:

hekuli: spores-1inv.p3

intothecontinuum: Some more inspiration from Bridget Riley —...

Mon, 07 Jan 2013 00:02:25 -0500

log-polar coordinates

Cartesian coordinates

intothecontinuum:

Some more inspiration from Bridget Riley — think Blaze 1 (1962).
The first image is what you get after transforming the second image into log-polar coordinates.

Mathematica code:

WfPlot[  t_ ] :=
 Graphics[
  Table[
   {AbsoluteThickness[3], 
    Line[
     Table[
      {i + If[Mod[i, 2] == 0, .5*Sin[j*2 Pi/66 + t], 0],
       (-1)^i*.5 + .4*j},
     {i, 1, 19}]]},
   {j, 1, 69, 1}],
  PlotRange -> {{1, 19}, {.8, 27.2}}, 
  ImageSize -> {500, 500}]


Manipulate[
 WfPlot[ t ],
{t, 0, 2Pi}]

LogPolar[x_, y_] := {Log[Sqrt[x^2 + y^2]], ArcTan[x, y]}

Manipulate[
  ImageTransformtion[
   WfPlot[ t ],
  LogPolar[#[[1]], #[[2]]] &, DataRange -> {{-Pi, Pi}, {-Pi, Pi}}],
{t,0,2Pi}]