Uploads by ScottDataRobot

From Knot Atlas
Jump to navigationJump to search

This special page shows all uploaded files.

File list
Date Name Thumbnail Size Description Versions
17:18, 21 February 2013 Naming and Enumeration Out 10.gif (file) 6 KB Show[DrawPD[Knot[13, NonAlternating, 5016], {Gap -> 0.025}]] 7
17:19, 21 February 2013 Braid Representatives Out 12.gif (file) 3 KB Show[BraidPlot[CollapseBraid[br2]]] 1
17:19, 21 February 2013 Braid Representatives Out 13.gif (file) 2 KB Show[BraidPlot[CollapseBraid[BR[Knot[5, 2]]]]] 3
17:19, 21 February 2013 Braid Representatives Out 15.gif (file) 2 KB Show[BraidPlot[CollapseBraid[BR[pd]]]] 2
17:19, 21 February 2013 Drawing Planar Diagrams Out 4.gif (file) 6 KB Show[DrawPD[TorusKnot[4, 3]]] 3
17:20, 21 February 2013 Drawing Planar Diagrams Out 6.gif (file) 6 KB Show[DrawPD[MillettUnknot]] 7
17:20, 21 February 2013 Drawing Planar Diagrams Out 7.gif (file) 6 KB Show[DrawPD[MillettUnknot, {Gap -> 0.03}]] 2
17:20, 21 February 2013 Drawing Braids Out 4.gif (file) 3 KB Show[BraidPlot[br]] 6
17:20, 21 February 2013 Drawing Braids Out 11.gif (file) 2 KB Show[BraidPlot[br1]] 5
17:20, 21 February 2013 Drawing Braids Out 13.gif (file) 2 KB Show[BraidPlot[br2]] 3
17:20, 21 February 2013 Invariants from Braid Theory Out 7.gif (file) 2 KB Show[BraidPlot[BR[K]]] 3
17:23, 21 February 2013 Finite Type Vassiliev Invariants Out 3.gif (file) 5 KB ListPlot[ Join @@ Table[ K = Knot[10, k] ; v2 = Vassiliev[2][K]; v3 = Vassiliev[3][K]; {{v2, v3}, {v2, -v3}}, {k, 165} ], PlotStyle -> PointSize[0.02], PlotRange -> All, AspectRatio -> 1 ] 4
17:23, 21 February 2013 Khovanov Homology Out 20.gif (file) 39 KB Show[TubePlot[TorusKnot[8, 7]]] 2
17:24, 21 February 2013 Drawing with TubePlot Out 3.gif (file) 9 KB Show[TubePlot[{Cos[t], Sin[t], 0}, {t, 0, 2Pi}, 0.1]] 1
17:24, 21 February 2013 Drawing with TubePlot Out 7.gif (file) 4 KB Show[TubePlot[ {Cos[t], Sin[t], 0}, {t, 0, 2Pi}, 0.3, TubeSubdivision -> {6, 3} ]] 3
17:24, 21 February 2013 Drawing with TubePlot Out 8.gif (file) 6 KB Show[TubePlot[ {Cos[t], Sin[t], 0}, {t, 0, 2Pi}, 0.2, TubeSubdivision -> {50, 2}, TubeFraming -> {Cos[2t]Cos[t], Cos[2t]Sin[t], Sin[3t]} ]] 2
17:24, 21 February 2013 Drawing with TubePlot Out 9.gif (file) 29 KB Show[TubePlot[ {Cos[2t], Sin[2t], 0} + 0.5{Cos[3t]Cos[2t], Cos[3t]Sin[2t], -Sin[3t]}, {t, 0, 2Pi}, 1/3, TubeSubdivision -> {280, 12}, TubeFraming -> {0,0,1}, TubePlotPrelude -> EdgeForm[{}], Boxed -> False, ViewPoint -> {0,0,1} ]] 3
17:24, 21 February 2013 Drawing with TubePlot Out 10.gif (file) 34 KB Show[TubePlot[TorusKnot[3, 5]]] 1
17:24, 21 February 2013 How to Edit this Manual... Out 5.gif (file) 5 KB Show[DrawPD[Knot[5, 1]]] 2