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

16,265 Reputation

10 today
+10 2 hours ago upvote
5 2 days ago
25 Oct 28
5 Oct 25
5 Oct 24
5 Oct 23
5 Oct 22
5 Oct 19
10 Oct 14
10 Oct 12
15 Oct 11
10 Oct 9
10 Oct 8
20 Sep 30
10 Sep 28
15 Sep 27
15 Sep 24
10 Sep 22
10 Sep 16
10 Sep 15
10 Sep 14
10 Sep 13
10 Sep 11
10 Sep 10
5 Aug 23
10 Aug 21
10 Aug 18
10 Aug 17
20 Aug 14
15 Aug 11