15,919 reputation
23089
bio website
location somewhere in England
age
visits member for 2 years, 6 months
seen 1 hour 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]

15,919 Reputation

10 yesterday
+10 03:59 upvote
10 2 days ago
10 Jul 22
10 Jul 21
20 Jul 20
70 Jul 18
5 Jul 17
12 Jul 16
5 Jul 15
42 Jul 14
7 Jul 13
5 Jul 12
10 Jul 10
10 Jul 5
10 Jul 2
10 Jun 27
5 Jun 24
10 Jun 21
10 Jun 19
10 Jun 15
10 Jun 9
10 Jun 8
20 Jun 5
5 Jun 3
30 Jun 1
5 May 26
5 May 24
10 May 22
10 May 16
20 May 10