16,315 reputation
23294
bio website
location somewhere in England
age
visits member for 2 years, 10 months
seen Nov 7 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]

May
10
awarded  Enlightened
May
10
awarded  Nice Answer
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