19,925
reputation
4
55
130
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
~747k
people reached
-
somewhere in England
-
Member for 7 years, 5 months
-
1,719 profile views
-
Last seen Nov 7 '14 at 8:15
