rosswolfe:

Justin Geddes’ Lost Cosmonaut series of paintings, oil on wood or oil on linen

1 week ago  Notes (25)
2dots: The Deadline by Jay Roeder

2dots:

The Deadline by Jay Roeder

5 months ago  Notes (28)

(via 2dots)

5 months ago  Notes (6302)
intothecontinuum: Mathematica code: Circles[Ccolor_, BGcolor_, X_, Y_, s_, r_, IS_] := Graphics[ Table[ {Ccolor, Disk[{x, y} + s, r]}, {x, -X, X}, {y, -Y, Y}], ImageSize -> IS, Background -> BGcolor, PlotRange -> {{-X-1, X+1}, {-Y-1, Y+1}}]W[x_, y_, w_, a_, t_] := w ((Cos[a] + Sin[a]) x + (Sin[a] - Cos[a]) y) + t*2 PiManipulate[Circles[ If[color==0,White, Black],If[color==0, Black, White], X, Y, .25 r*{Cos[W[x, y, w, a, t]], Sin[W[x, y, w, a, t]]}, r/2, IS],{color,0,1,1}, {IS, {{500}, {500, 700}}},{X, 10, 100, 1}, {Y, 10, 100, 1},{{r, .5}, .1, 1},{{w, 1}, 0, 1},{a, 0, 2 Pi},{t, 0, 1}]Manipulate[ Circles[ White, Black, 10, 14,  .25 (.5)*{Cos[W[x, y, .25, 3Pi/2, t]], Sin[W[x, y, .25, 3Pi/2, t]]}, .5/2, {500,700}],{t, 0, 1}]

intothecontinuum:

Mathematica code:

Circles[Ccolor_, BGcolor_, X_, Y_, s_, r_, IS_] :=
 Graphics[
  Table[
   {Ccolor,
    Disk[{x, y} + s, r]},
   {x, -X, X}, {y, -Y, Y}],
  ImageSize -> IS, Background -> BGcolor, 
  PlotRange -> {{-X-1, X+1}, {-Y-1, Y+1}}]

W[x_, y_, w_, a_, t_] := 
 w ((Cos[a] + Sin[a]) x + (Sin[a] - Cos[a]) y) + t*2 Pi

Manipulate[
Circles[
 If[color==0,White, Black],If[color==0, Black, White], X, Y,
 .25 r*{Cos[W[x, y, w, a, t]], Sin[W[x, y, w, a, t]]},
  r/2, IS],
{color,0,1,1}, {IS, {{500}, {500, 700}}},
{X, 10, 100, 1}, {Y, 10, 100, 1},
{{r, .5}, .1, 1},{{w, 1}, 0, 1},{a, 0, 2 Pi},
{t, 0, 1}]

Manipulate[
 Circles[
  White, Black, 10, 14,
  .25 (.5)*{Cos[W[x, y, .25, 3Pi/2, t]], Sin[W[x, y, .25, 3Pi/2, t]]},
  .5/2, {500,700}],
{t, 0, 1}]

6 months ago  Notes (1019)

call-stack:

intothecontinuum:

Symmetry is merely an expression of how something stands in relation to itself.

Mathematica code:

R[n_] := (SeedRandom[n]; RandomReal[])

Table[
Animate[
 Graphics[
  Table[
   {PointSize[.03], Opacity[Exp[-.8 (Mod[t - 5*R[Q*i], 5])]], 
    Point[
       Table[
        RotationTransform[k*2 Pi/8][{R[Q*2 i], R[Q*2 i + 1]}],
      {k, 0, 7, 1}]]},
   {i, 1, 100, 1}],
  PlotRange -> 1.33, ImageSize -> 500],
 {t, 0, 29/6, 1/6}, AnimationRunning ->False],
{Q, {5, 7, 10, 14}}]

Yay! Thank you so very much. if you are not all ready following intothecontinuum I would highly recommend it.

(via static-void)

10 months ago  Notes (614)
call-stack: An animation showing the construction of a hypercube graph of dimension 4

call-stack:

An animation showing the construction of a hypercube graph of dimension 4

(Source: static-void)

10 months ago  Notes (2105)
memorybedroom: Entre linhas e corpos (Publicado com o Instagram)

memorybedroom:

Entre linhas e corpos (Publicado com o Instagram)

10 months ago  Notes (1)
ethel-baraona: A model of a Soviet arctic port city for 4,000 inhabitants, shown at the Expo-67 in Montreal. Sputnik Digest, February 1968. “The town has no streets, squares, or separate houses. It lies entirely under a cement roof and has walls of metal and glass. The town, together with an ever-green orchard and a micro-climate of its own, is encased in a single shell.” [via mikasavela + downwithutopia]

ethel-baraona:

A model of a Soviet arctic port city for 4,000 inhabitants, shown at the Expo-67 in Montreal. Sputnik Digest, February 1968.

“The town has no streets, squares, or separate houses. It lies entirely under a cement roof and has walls of metal and glass. The town, together with an ever-green orchard and a micro-climate of its own, is encased in a single shell.”

[via mikasavela + downwithutopia]

11 months ago  Notes (36)