19,715
reputation
2
53
127
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]
257
answers
34
questions
~707k
people reached
-
somewhere in England
-
Member for 6 years, 11 months
-
1,698 profile views
-
Last seen Nov 7 '14 at 8:15
