Архив
Posted on 5th Май at 3:32 AM, with 16~845 заметок
intothecontinuum:

Inspired by an exhibit in the Gallery Room in Antichamber
Mathematica code:
v[x_, y_, z_] =   Flatten[Table[ {(-1)^i*x, (-1)^j*y, (-1)^k*z}, {i, 0, 1}, {j, 0,      1}, {k, 0, 1} ], 2];f = {{1 , 2 , 4 , 3  }, {1 , 2 , 6 , 5  }, {5 , 6 , 8 , 7  }, { 3, 4 ,     8 , 7  }, { 1, 3 , 7 , 5 }, { 2, 4 , 8 , 6  } };G[x_, y_, z_, s_, H_ , t_] := Table[  Translate[   Rotate[    GraphicsComplex[v[x, y, z], Polygon[f]],    h (Cos[t] + 1) Pi/4, {0 , 0, 1 }],   {0, 0, s*h}],  {h, 1, H}]Manipulate[  Graphics3D[   G[2, 2, .1, .25, 30, t],   Lighting -> "Neutral", ViewPoint -> Front, ViewAngle -> 35 Degree,   Boxed -> False, ImageSize -> 500],  {t, 0, Pi}]

intothecontinuum:

Inspired by an exhibit in the Gallery Room in Antichamber

Mathematica code:


v[x_, y_, z_] =
Flatten[Table[ {(-1)^i*x, (-1)^j*y, (-1)^k*z}, {i, 0, 1}, {j, 0,
1}, {k, 0, 1} ], 2];

f = {{1 , 2 , 4 , 3 }, {1 , 2 , 6 , 5 }, {5 , 6 , 8 , 7 }, { 3, 4 ,
8 , 7 }, { 1, 3 , 7 , 5 }, { 2, 4 , 8 , 6 } };

G[x_, y_, z_, s_, H_ , t_] :=
Table[
Translate[
Rotate[
GraphicsComplex[v[x, y, z], Polygon[f]],
h (Cos[t] + 1) Pi/4, {0 , 0, 1 }],
{0, 0, s*h}],
{h, 1, H}]

Manipulate[
Graphics3D[
G[2, 2, .1, .25, 30, t],
Lighting -> "Neutral", ViewPoint -> Front, ViewAngle -> 35 Degree,
Boxed -> False, ImageSize -> 500],
{t, 0, Pi}]
Posted on 5th Май at 3:28 AM, with 173~763 заметки
GUYS. I JUST REALIZED.

joshpeck:

soufflesagainstthedaleks:

YOU KNOW THIS GUY?

image

THAT’S JOSH PECK.

KNOW WHAT ELSE A “PECK” IS?

image

A BOOB.

image

JOSH IS LITERALLY A BOOB.

( ͡° ͜ʖ ͡°)

Posted on 29th апр at 4:10 PM, with 199~992 заметки
justsomeblondie:

unshaped:

ahealthierlexie:

Fuck the police



That’s the plan
Просмотреть в высоком разрешении

justsomeblondie:

unshaped:

ahealthierlexie:

Fuck the police

enn

That’s the plan

Posted on 29th апр at 4:06 PM, with 12~385 заметок
the-boywho:

Matthew Hitt, By Soo
Просмотреть в высоком разрешении

the-boywho:

Matthew Hitt, By Soo

Posted on 29th апр at 4:02 PM, with 21 заметка
Просмотреть в высоком разрешении
Start
00:00 AM