|
|
Line 43: |
Line 43: |
|
<table> |
|
<table> |
|
<tr valign=top> |
|
<tr valign=top> |
|
<td><font color=blue><pre>In[1]:= </font></pre></td>
|
|
<td><pre style="color: blue; border: 0px; padding: 0em">In[1]:= </pre></td> |
|
<td align=left><font color=red><pre><< KnotTheory`</pre></font></td>
|
|
<td align=left><pre style="color: red; border: 0px; padding: 0em"><< KnotTheory`</pre></td> |
|
</tr> |
|
</tr> |
|
<tr valign=top><td colspan=2><pre><*KnotTheoryWelcomeMessage[]*></pre></td></tr> |
|
<tr valign=top><td colspan=2><pre style="border: 0px; padding: 0em"><*KnotTheoryWelcomeMessage[]*></pre></td></tr> |
Revision as of 15:47, 26 August 2005
Visit [<*KnotilusURL[K]<>" "<>ThisKnot*>'s page] at Knotilus!
Visit <*m*>.<*n*>.html <*ThisKnot*>'s page at the original Knot Atlas!
Knot presentations
Polynomial invariants
Polynomial invariants
Further Quantum Invariants
Computer Talk
The above data is available with the
Mathematica package
KnotTheory`
, as shown in the (simulated) Mathematica session below. Your input (in
red) is realistic; all else should have the same content as in a real mathematica session, but with different formatting. This Mathematica session is also available (albeit only for the knot
5_2) as the notebook
PolynomialInvariantsSession.nb.
(The path below may be different on your system, and possibly also the KnotTheory` date)
In[1]:=
|
AppendTo[$Path, "C:/drorbn/projects/KAtlas/"];
<< KnotTheory`
|
In[3]:=
|
K = Knot["Torus Knot Splice Base"];
|
|
KnotTheory::loading: Loading precomputed data in PD4Knots`.
|
In[6]:=
|
Alexander[K, 2][t]
|
|
KnotTheory::credits: The program Alexander[K, r] to compute Alexander ideals was written by Jana Archibald at the University of Toronto in the summer of 2005.
|
In[7]:=
|
{KnotDet[K], KnotSignature[K]}
|
|
KnotTheory::loading: Loading precomputed data in Jones4Knots`.
|
In[9]:=
|
HOMFLYPT[K][a, z]
|
|
KnotTheory::credits: The HOMFLYPT program was written by Scott Morrison.
|
In[10]:=
|
Kauffman[K][a, z]
|
|
KnotTheory::loading: Loading precomputed data in Kauffman4Knots`.
|
V2 and V3
|
<*{Vassiliev[2][K], Vassiliev[3][K]}*>)
|
Khovanov Homology. The coefficients of the monomials are shown, along with their alternating sums (fixed , alternation over ). The squares with yellow highlighting are those on the "critical diagonals", where or , where <*s=KnotSignature[K]*> is the signature of <*ThisKnot*>. Nonzero entries off the critical diagonals (if any exist) are highlighted in red.
<*TabularKh[Kh[K][q, t], s+{1,-1}]*>