User Portlet User Portlet

Clayton Shonkwiler
Discussions
![Some random paths on the sphere][1] **Pathways** This was inspired by some [very cool pieces by Caleb Ogg][2]. The basic setup is that I choose 20 random points on the sphere... spherepoints = Normalize /@...
![Rotating truncation of the tetrahedron][1] **Five Easy Pieces** Practically the same idea (and code) as [_Give Me Some Space_][2], just truncating the tetrahedron rather than rectifying it. The code for the `Manipulate` is below; when...
Nice! Love the pentagon and star!
![Minimal 7_4 knot on the simple cubic lattice][1] **Master Control Program** Continuing the series of minimal lattice knots ([1][2], [2][3], [3][4], [4][5]), but now back to the simple cubic lattice with the [$7_4$ knot][6] (a.k.a. the...
![Rotating minimal 7_7 on the BCC lattice][5] **Home on the Range** Continuing the series ([1][1], [2][2], [3][3]), this time with a minimal $7_7$ knot on the body-centered cubic lattice. Instead of viewing the projection of the knot as a bunch...
Huh. `AnglePath3D[]` is a new one to me (in fact, it doesn't even exist on my laptop, which is still on 11.0.1).
Oh, nice! I never knew about `Standardize[]`. Very useful! I also really like your $t \mapsto \frac{t^3}{1-3t(1-t)}$ function for smooth interpolation.
> As for the main code itself: the standard advice of replacing `M.# & /@ > pts` with `pts.Transpose[M]` and `RotationMatrix[-θ, axis].# & /@ {p, q}` > with `{p, q}.RotationMatrix[θ, axis]` applies. ;) Yeah, I know. I think I've never quite...
These are very cool! Thanks!
Hi Karram, All my animations are covered by a Creative Commons [Attribution-NonCommercial-NoDerivatives license][1], which basically says you can use them for non-commercial purposes as long as you credit me. Best, Clay [1]:...