Mathematica
code:
Rot80 =  Table[  Table[   RotationTransform[a, {1, 1, 0}, {0, 0, 0}][Tuples[{-1, 1}, 3][[v]]],  {v, 1, 8, 1}],{a, 0, 2 Pi,  Pi/80}]Edge := {1, 2, 4, 3, 7, 8, 6, 5, 1, 3, 4, 8, 7, 5, 6, 2}CubeTrail[h_, op_, N_, s_, r_, z_, t_, PR_, IS_, C_] := Graphics[  Table[   Scale[    Translate[     {AbsoluteThickness[h], Opacity[op],       If[C == 1, Black, White],      Line[       Table[        {Rot80[[1 + Mod[t, 80]]][[Edge[[e]]]][[1]],         Rot80[[1 + Mod[t, 80]]][[Edge[[e]]]][[2]]},        {e, 1, 16, 1}]]},     r{Cos[2 Pi*(n*t/80 + k)/N], Sin[2 Pi*(n*t/80 + k)/N]}],    z^n, r{Cos[2 Pi*(n*t/80 + k)/N], Sin[2 Pi*(n*t/80 + k)/N]}],   {k, 1, N, 1},   {n, 1, s, 1}],  PlotRange -> PR, ImageSize -> 500,   Background -> If[C == 0, Black, White]]Manipulate[P = {h, op, N, s, r, z, t, PR, IS, C}; CubeTrail[h, op, N, s, r, z, t, PR, 500, 0],{{h, 1}, 0, 20}, {op, 1, 0}, {{N, 4}, 1, 16, 1}, {s, 1, 100, 1}, {{r, 3.5}, 0, 10}, {z, 1, 0},{{PR, 5}, 1, 5}, {C, 0, 1, 1},{t, 0, 100, 1}]P ={1.5, 1, 4, 8, 3.8, 0.75, 0, 5, 500, 0}Manipulate[CubeTrail[P[[1]],P[[2]],P[[3]],P[[4]],P[[5]],P[[6]],t,P[[8]],500,0],{t, 1, 80, 1}]
Filed under: #GIF  #Mathematica  #cubes  #projections

1. demonputty reblogged this from spring-of-mathematics
2. psycedelicate reblogged this from pollutive
3. pollutive reblogged this from toyte
4. humansarealiens reblogged this from toyte
5. lndshrk reblogged this from toyte
6. toyte reblogged this from vvampirevveeknd
7. dreamofthemoon reblogged this from behindthelenzes
8. melina-bea reblogged this from intothecontinuum
9. the-promised-wlan reblogged this from andrewkellogg
10. malprocrastination reblogged this from darth-vader
11. theonlyshawnde reblogged this from pen-island
12. pen-island reblogged this from darth-vader
14. fistiecuffs reblogged this from darth-vader
15. darth-vader reblogged this from intothecontinuum
16. looksomeonefinally reblogged this from intothecontinuum
18. adidhash reblogged this from intothecontinuum
19. classy-xbox reblogged this from klub-kiss
20. maaaddison reblogged this from carriepoppins
21. carriepoppins reblogged this from klub-kiss
22. naivesmiles reblogged this from klub-kiss
23. klub-kiss reblogged this from mistysea
24. bubbaganjalion reblogged this from witchhousepoland
25. mayorhoney reblogged this from gnorcs and added:
@_@
26. tgv83 reblogged this from intothecontinuum
27. sicl9 reblogged this from intothecontinuum
28. jeanderoche reblogged this from intothecontinuum
29. sirsuffix reblogged this from brittonius
30. brittonius reblogged this from intothecontinuum
31. diariodebordoblog reblogged this from saudades-a-mil