Edit T(13,2) Further Notes and Views
Knot presentations
Planar diagram presentation
|
X11,25,12,24 X25,13,26,12 X13,1,14,26 X1,15,2,14 X15,3,16,2 X3,17,4,16 X17,5,18,4 X5,19,6,18 X19,7,20,6 X7,21,8,20 X21,9,22,8 X9,23,10,22 X23,11,24,10
|
Gauss code
|
-4, 5, -6, 7, -8, 9, -10, 11, -12, 13, -1, 2, -3, 4, -5, 6, -7, 8, -9, 10, -11, 12, -13, 1, -2, 3
|
Dowker-Thistlethwaite code
|
14 16 18 20 22 24 26 2 4 6 8 10 12
|
Polynomial invariants
Alexander polynomial |
|
Conway polynomial |
|
2nd Alexander ideal (db, data sources) |
|
Determinant and Signature |
{ 13, 12 } |
Jones polynomial |
|
HOMFLY-PT polynomial (db, data sources) |
|
Kauffman polynomial (db, data sources) |
|
The A2 invariant |
Data:T(13,2)/QuantumInvariant/A2/1,0 |
The G2 invariant |
Data:T(13,2)/QuantumInvariant/G2/1,0 |
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["T(13,2)"];
|
|
KnotTheory::loading: Loading precomputed data in PD4Knots`.
|
Out[4]=
|
|
Out[5]=
|
|
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.
|
Out[6]=
|
|
In[7]:=
|
{KnotDet[K], KnotSignature[K]}
|
|
KnotTheory::loading: Loading precomputed data in Jones4Knots`.
|
Out[8]=
|
|
In[9]:=
|
HOMFLYPT[K][a, z]
|
|
KnotTheory::credits: The HOMFLYPT program was written by Scott Morrison.
|
Out[9]=
|
|
In[10]:=
|
Kauffman[K][a, z]
|
|
KnotTheory::loading: Loading precomputed data in Kauffman4Knots`.
|
Out[10]=
|
|
"Similar" Knots (within the Atlas)
Same Alexander/Conway Polynomial:
{}
Same Jones Polynomial (up to mirroring, ):
{}
Computer Talk
The above data is available with the
Mathematica package
KnotTheory`
. Your input (in
red) is realistic; all else should have the same content as in a real mathematica session, but with different formatting.
(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["T(13,2)"];
|
In[4]:=
|
{A = Alexander[K][t], J = Jones[K][q]}
|
|
KnotTheory::loading: Loading precomputed data in PD4Knots`.
|
|
KnotTheory::loading: Loading precomputed data in Jones4Knots`.
|
Out[4]=
|
{ , }
|
In[5]:=
|
DeleteCases[Select[AllKnots[], (A === Alexander[#][t]) &], K]
|
|
KnotTheory::loading: Loading precomputed data in DTCode4KnotsTo11`.
|
|
KnotTheory::credits: The GaussCode to PD conversion was written by Siddarth Sankaran at the University of Toronto in the summer of 2005.
|
In[6]:=
|
DeleteCases[
Select[
AllKnots[],
(J === Jones[#][q] || (J /. q -> 1/q) === Jones[#][q]) &
],
K
]
|
|
KnotTheory::loading: Loading precomputed data in Jones4Knots11`.
|
V2,1 through V6,9:
|
V2,1
|
V3,1
|
V4,1
|
V4,2
|
V4,3
|
V5,1
|
V5,2
|
V5,3
|
V5,4
|
V6,1
|
V6,2
|
V6,3
|
V6,4
|
V6,5
|
V6,6
|
V6,7
|
V6,8
|
V6,9
|
Data:T(13,2)/V 2,1
|
Data:T(13,2)/V 3,1
|
Data:T(13,2)/V 4,1
|
Data:T(13,2)/V 4,2
|
Data:T(13,2)/V 4,3
|
Data:T(13,2)/V 5,1
|
Data:T(13,2)/V 5,2
|
Data:T(13,2)/V 5,3
|
Data:T(13,2)/V 5,4
|
Data:T(13,2)/V 6,1
|
Data:T(13,2)/V 6,2
|
Data:T(13,2)/V 6,3
|
Data:T(13,2)/V 6,4
|
Data:T(13,2)/V 6,5
|
Data:T(13,2)/V 6,6
|
Data:T(13,2)/V 6,7
|
Data:T(13,2)/V 6,8
|
Data:T(13,2)/V 6,9
|
|
V2,1 through V6,9 were provided by Petr Dunin-Barkowski <barkovs@itep.ru>, Andrey Smirnov <asmirnov@itep.ru>, and Alexei Sleptsov <sleptsov@itep.ru> and uploaded on October 2010 by User:Drorbn. Note that they are normalized differently than V2 and V3.
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 12 is the signature of T(13,2). Nonzero entries off the critical diagonals (if any exist) are highlighted in red.
|
|
|
0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | χ |
39 | | | | | | | | | | | | | | 1 | -1 |
37 | | | | | | | | | | | | | | | 0 |
35 | | | | | | | | | | | | 1 | 1 | | 0 |
33 | | | | | | | | | | | | | | | 0 |
31 | | | | | | | | | | 1 | 1 | | | | 0 |
29 | | | | | | | | | | | | | | | 0 |
27 | | | | | | | | 1 | 1 | | | | | | 0 |
25 | | | | | | | | | | | | | | | 0 |
23 | | | | | | 1 | 1 | | | | | | | | 0 |
21 | | | | | | | | | | | | | | | 0 |
19 | | | | 1 | 1 | | | | | | | | | | 0 |
17 | | | | | | | | | | | | | | | 0 |
15 | | | 1 | | | | | | | | | | | | 1 |
13 | 1 | | | | | | | | | | | | | | 1 |
11 | 1 | | | | | | | | | | | | | | 1 |
|