16,370 reputation
23395
bio website
location somewhere in England
age
visits member for 2 years, 11 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]

Dec
15
awarded  Nice Answer
Dec
3
awarded  Notable Question
Oct
28
awarded  Nice Answer
Oct
28
awarded  Good Question
Sep
30
awarded  Explainer
Sep
24
awarded  Autobiographer
Sep
22
awarded  Nice Answer
Sep
22
awarded  Announcer
Sep
19
awarded  Generalist
Jul
18
awarded  Necromancer
Jul
14
awarded  Self-Learner
Jul
14
awarded  Revival
Jul
2
awarded  Inquisitive
Jul
2
awarded  Curious
Jun
19
awarded  Popular Question
Jun
5
awarded  Nice Answer
Jun
4
awarded  Popular Question
Jun
3
awarded  Nice Question
Jun
1
awarded  Enlightened
Jun
1
awarded  Nice Answer