9,965 reputation
11258
bio website
location somewhere in England
age
visits member for 1 year, 4 months
seen 4 hours ago
stats profile views 804

Mathematica apprentice

My gravatar is an eternal golden braid, made with the following Mathematica code:

Graphics3D[{
  GrayLevel[.3], Specularity[White, 15],
  Lighting -> {{"Directional", 
     RGBColor[1, .5, .4], {{5, 5, 10}, {5, 5, 0}}},
    {"Point", Yellow, {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]

94 Tags

221
× 40
22
× 7
12
× 3
7
× 3
129
× 32
20
× 9
12
7
87
× 26
19
× 11
11
× 6
6
× 2
87
× 6
18
× 5
11
× 4
6
× 2
59
× 14
18
× 3
11
6
46
× 10
16
× 3
11
6
41
× 3
16
× 3
11
6
34
× 5
16
11
5
× 3
33
× 6
16
10
× 3
5
× 3
31
× 6
15
9
× 2
5
× 2
28
× 5
13
× 2
9
5
× 2
25
× 3
13
× 2
7
× 4
5
× 2
22
× 11
12
× 4
7
× 3
5
× 2