16,075 reputation
23189
bio website
location somewhere in England
age
visits member for 2 years, 8 months
seen 5 hours ago

Mathematica apprentice

My gravatar was made with the following Mathematica code:

Graphics3D[{
  GrayLevel[.3], Specularity[White, 15],
  Lighting -> {{"Directional", 
     RGBColor[.3, .3, .4], {{5, 5, 10}, {5, 5, 0}}},
    {"Point", Black, {12, 3, 15}},  
    {"Point", White, {12, 3, 4}}},
  KnotData[{"TorusKnot", {2, 5}}, "ImageData"]}, 
 ViewVector -> {{0, 0, 5}, {0, 0, 0}}, Boxed -> False, 
 Background -> None, Axes -> False, ImageSize -> 1000]

16,075 Reputation

10 Jun 20 '13
30 Jun 19 '13
30 Jun 17 '13
10 Jun 15 '13
20 Jun 14 '13
20 Jun 13 '13
50 Jun 12 '13
20 Jun 11 '13
50 Jun 10 '13
10 Jun 9 '13
30 Jun 8 '13
75 Jun 7 '13
125 Jun 6 '13
105 Jun 5 '13
155 Jun 4 '13
25 Jun 3 '13
65 Jun 2 '13
20 Jun 1 '13
30 May 31 '13
20 May 30 '13
10 May 29 '13
45 May 28 '13
10 May 27 '13
30 May 26 '13
30 May 25 '13
10 May 24 '13
10 May 23 '13
90 May 22 '13
75 May 21 '13
-5 May 20 '13