16,426 reputation
23495
bio website
location somewhere in England
age
visits member for 3 years
seen Nov 7 '14 at 8:15

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,426 Reputation

25 Sep 23 '13
45 Sep 22 '13
20 Sep 21 '13
30 Sep 20 '13
60 Sep 18 '13
0 Sep 16 '13
5 Sep 15 '13
5 Sep 14 '13
70 Sep 13 '13
10 Sep 12 '13
65 Sep 11 '13
10 Sep 10 '13
35 Sep 8 '13
5 Sep 4 '13
10 Sep 2 '13
5 Aug 31 '13
10 Aug 30 '13
15 Aug 29 '13
15 Aug 27 '13
20 Aug 24 '13
30 Aug 23 '13
20 Aug 22 '13
80 Aug 21 '13
15 Aug 18 '13
40 Aug 16 '13
10 Aug 15 '13
35 Aug 13 '13
50 Aug 12 '13
10 Aug 11 '13
20 Aug 10 '13