15,920 reputation
23089
bio website
location somewhere in England
age
visits member for 2 years, 6 months
seen 11 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]

15,920 Reputation

10 Jan 20
10 Jan 18
10 Jan 17
10 Jan 16
30 Jan 15
5 Jan 13
20 Jan 12
10 Jan 11
10 Jan 3
40 Dec 31 '13
20 Dec 30 '13
10 Dec 28 '13
5 Dec 27 '13
30 Dec 24 '13
20 Dec 23 '13
30 Dec 19 '13
70 Dec 18 '13
10 Dec 17 '13
15 Dec 15 '13
10 Dec 14 '13
25 Dec 13 '13
30 Dec 12 '13
140 Dec 11 '13
25 Dec 10 '13
10 Dec 7 '13
10 Dec 6 '13
5 Nov 30 '13
25 Nov 29 '13
10 Nov 28 '13
10 Nov 27 '13