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]

16,370 Reputation

10 Dec 17
10 Dec 15
5 Dec 10
+5 09:17 upvote
10 Dec 4
10 Nov 26
10 Nov 23
5 Nov 21
30 Nov 13
5 Nov 12
5 Nov 11
5 Nov 2
10 Oct 31
5 Oct 29
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