15,463 reputation
22678
bio website
location somewhere in England
age
visits member for 2 years, 3 months
seen Feb 23 at 23:03

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]

Apr
2
awarded  Necromancer
Mar
14
awarded  Announcer
Mar
7
awarded  Taxonomist
Feb
4
awarded  Popular Question
Jan
17
awarded  Yearling
Dec
23
awarded  Good Question
Dec
11
awarded  Nice Answer
Dec
1
awarded  Notable Question
Nov
27
awarded  Good Answer
Nov
15
awarded  Enlightened
Nov
1
awarded  Nice Answer
Oct
29
awarded  Popular Question
Oct
6
awarded  Nice Answer
Oct
2
awarded  Nice Answer
Sep
21
awarded  Popular Question
Sep
15
awarded  Good Answer
Sep
11
awarded  Popular Question
Aug
31
awarded  Good Question
Aug
23
awarded  Good Question
Aug
21
awarded  Disciplined