Mathematica code:Tile[k_, rx_, ry_, x_, y_, r_] := Table[ Translate[ Rotate[ {AbsoluteThickness[k], Circle[{i, i}, {rx, ry}, {i*Pi #pattern

    Mathematica code:Tile[k_, rx_, ry_, x_, y_, r_] := Table[ Translate[ Rotate[ {AbsoluteThickness[k], Circle[{i, i}, {rx, ry}, {i*Pi #pattern

    From Intothecontinuum.tumblr.com

    #1d1d1d #525252 #868686 #c0c0c0 #f8f8f8

    Viktor Brittsjö Saved to digital