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 7 years, 1 month
-
2 profile views
-
Last seen Feb 23 '14 at 12:06
Communities (11)
Top network posts
Badges (5)
Gold
—
Silver
2
Rarest
Bronze
3
Rarest
-
Jan 26 '14
-
Jan 20 '14
-
Sep 24 '14
