Skip to main content
Search type Search syntax
Tags [tag]
Exact "words here"
Author user:1234
user:me (yours)
Score score:3 (3+)
score:0 (none)
Answers answers:3 (3+)
answers:0 (none)
isaccepted:yes
hasaccepted:no
inquestion:1234
Views views:250
Code code:"if (foo != bar)"
Sections title:apples
body:"apples oranges"
URL url:"*.example.com"
Saves in:saves
Status closed:yes
duplicate:no
migrated:no
wiki:no
Types is:question
is:answer
Exclude -[tag]
-apples
For more details on advanced search visit our help page
Results tagged with
Search options answers only not deleted user 50

Questions about exploring knot theory using Mathematica.

4 votes

Issue Plotting Torus Link

The (1,4) torus knot is known to KnotData[], so we can use that to build the (2,8) knot: knot14 = First[KnotData[{"TorusKnot", {1, 4}}, "ImageData"]]; Graphics3D[MapThread[Insert[##, {2, 1}] &, …
J. M.'s missing motivation's user avatar
8 votes

RegionPlot3D KnotData

You can feed the BoundaryMeshRegion[] you can obtain from KnotData[] into RegionPlot3D[]. For example: trefBMR = KnotData["Trefoil", "BoundaryMeshRegion"]; RegionPlot3D[RegionMember[trefBMR, {x, y, z} …
J. M.'s missing motivation's user avatar
3 votes

Intersection between knot and plane

For completeness, here is how to use the MeshFunctions approach in the general case of a plane defined by three noncollinear points: sc = KnotData["FigureEight", "SpaceCurve"]; threepoints = N[{{0, 0 …
J. M.'s missing motivation's user avatar