569
reputation
2
3

cormullion

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]
1
answer
0
questions
0
people reached
  • somewhere in England
  • Member for 6 years, 6 months
  • 2 profile views
  • Last seen Feb 23 '14 at 12:06

Top tags (3)

Score 3
Posts 1
Score 3
Posts 1
Score 3
Posts 1

Top posts (1) All Questions Answers | Votes Newest

Badges (5)

Gold

Silver

2

Rarest

Bronze

3

Rarest