290 reputation
23
bio website
location somewhere in England
age
visits member for 2 years, 3 months
seen Dec 30 '13 at 21:57

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]

290 Reputation

10 Nov 26 '12
10 Feb 22 '12
25 Feb 21 '12
18 Jan 24 '12
48 Jan 23 '12
10 Jan 22 '12
10 Jan 20 '12
10 Jan 15 '12
30 Jan 14 '12
18 Jan 13 '12
100 Jan 12 '12