(via mellow-hypee)
(Source: gifmovie, via burnmycandle)
loveee
(via karla-world)
(via burnmycandle)
(Source: lifes-greatest-illusion, via oh-drugs-deactivated20120704)
(Source: nothingforkings)
Seems like my work got featured. Cool beans tumblr.
I fixed most of the gifs, they should work properly now. And here one last gif that got lost in my computer.
(Source: kongsprout)
Type 1) form constant: tunnel
Mathematica code:
VStripes[t_] :=
ImageCrop[
DensityPlot[
Cos[x - t*Pi/5],
{x, -20 Pi, 20 Pi}, {y, -20 Pi, 20 Pi},
PlotPoints -> 100, Mesh -> False, Frame -> False,
ColorFunction -> GrayLevel, ImageSize -> 522],
500]
ListAnimate[
Table[
VStripes[t],
{t, 0, .9, .1}]]
f[x_, y_] := {Log[Sqrt[(x)^2 + (y)^2]], ArcTan[x, y]}
ListAnimate[
Table[
ImageTransformation[
VStripes[t],
f[#[[1]], #[[2]]] &, DataRange -> {{-Pi, Pi}, {-Pi, Pi}}],
{t, 0, .9, .1}]]