© | Dror Bar-Natan: The Knot Atlas: The Rolfsen Knot Table:
10.96
1096
10.98
1098
    10.97
KnotPlot
This page is passe. Go here instead!

   The Alternating Knot 1097   

Visit 1097's page at the Knot Server (KnotPlot driven, includes 3D interactive images!)

Visit 1097's page at Knotilus!

Acknowledgement

10.97
KnotPlot

PD Presentation: X4251 X12,6,13,5 X8394 X2,9,3,10 X16,12,17,11 X10,18,11,17 X18,8,19,7 X20,14,1,13 X14,20,15,19 X6,16,7,15

Gauss Code: {1, -4, 3, -1, 2, -10, 7, -3, 4, -6, 5, -2, 8, -9, 10, -5, 6, -7, 9, -8}

DT (Dowker-Thistlethwaite) Code: 4 8 12 18 2 16 20 6 10 14

Minimum Braid Representative:


Length is 14, width is 5
Braid index is 5

A Morse Link Presentation:

3D Invariants:
Symmetry Type Unknotting Number 3-Genus Bridge/Super Bridge Index Nakanishi Index
Reversible 2 2 3 / NotAvailable 1

Alexander Polynomial: - 5t-2 + 22t-1 - 33 + 22t - 5t2

Conway Polynomial: 1 + 2z2 - 5z4

Other knots with the same Alexander/Conway Polynomial: {...}

Determinant and Signature: {87, 2}

Jones Polynomial: q-1 - 3 + 7q - 11q2 + 14q3 - 14q4 + 14q5 - 11q6 + 7q7 - 4q8 + q9

Other knots (up to mirrors) with the same Jones Polynomial: {...}

A2 (sl(3)) Invariant: q-4 - q-2 - 1 + 4q2 - 2q4 + q6 + 2q8 - 2q10 + 2q12 - 2q14 + 2q16 + q18 - 2q20 + 3q22 - 2q24 - 2q26 + q28

HOMFLY-PT Polynomial: - a-8 + a-8z2 + 2a-6 + 2a-6z2 - a-6z4 - 2a-4 - 4a-4z2 - 3a-4z4 + 2a-2 + 2a-2z2 - a-2z4 + z2

Kauffman Polynomial: a-10z2 - 2a-10z4 + a-10z6 + 8a-9z3 - 11a-9z5 + 4a-9z7 - a-8 + a-8z2 + 4a-8z4 - 11a-8z6 + 5a-8z8 - 4a-7z + 20a-7z3 - 28a-7z5 + 7a-7z7 + 2a-7z9 - 2a-6 + 3a-6z2 + 5a-6z4 - 21a-6z6 + 11a-6z8 - 6a-5z + 24a-5z3 - 32a-5z5 + 11a-5z7 + 2a-5z9 - 2a-4 + 10a-4z2 - 9a-4z4 - 3a-4z6 + 6a-4z8 - 2a-3z + 10a-3z3 - 12a-3z5 + 8a-3z7 - 2a-2 + 6a-2z2 - 7a-2z4 + 6a-2z6 - 2a-1z3 + 3a-1z5 - z2 + z4

V2 and V3, the type 2 and 3 Vassiliev invariants: {2, 4}

Khovanov Homology:
(The squares with yellow highlighting are those on the "critical diagonals", where j-2r=s+1 or j-2r=s+1, where s=2 is the signature of 1097. Nonzero entries off the critical diagonals (if any exist) are highlighted in red.)
  
trqj r = -2r = -1r = 0r = 1r = 2r = 3r = 4r = 5r = 6r = 7r = 8
j = 19          1
j = 17         3 
j = 15        41 
j = 13       73  
j = 11      74   
j = 9     77    
j = 7    77     
j = 5   47      
j = 3  37       
j = 1 15        
j = -1 2         
j = -31          

 n  Coloured Jones Polynomial (in the (n+1)-dimensional representation of sl(2))
2 q-4 - 3q-3 + 3q-2 + 5q-1 - 19 + 18q + 20q2 - 65q3 + 43q4 + 60q5 - 130q6 + 53q7 + 113q8 - 172q9 + 36q10 + 148q11 - 165q12 + q13 + 148q14 - 119q15 - 30q16 + 112q17 - 57q18 - 37q19 + 57q20 - 12q21 - 21q22 + 15q23 + q24 - 4q25 + q26


Computer Talk. The data above can be recomputed by Mathematica using the package KnotTheory`. Following setup, the sample Mathematica session below reproduces most of the above data (Mathematica system prompts in blue, human input in red, Mathematica output in black):

In[1]:=    
<< KnotTheory`
Loading KnotTheory` (version of August 30, 2005, 10:15:35)...
In[2]:=
PD[Knot[10, 97]]
Out[2]=   
PD[X[4, 2, 5, 1], X[12, 6, 13, 5], X[8, 3, 9, 4], X[2, 9, 3, 10], 
 
>   X[16, 12, 17, 11], X[10, 18, 11, 17], X[18, 8, 19, 7], X[20, 14, 1, 13], 
 
>   X[14, 20, 15, 19], X[6, 16, 7, 15]]
In[3]:=
GaussCode[Knot[10, 97]]
Out[3]=   
GaussCode[1, -4, 3, -1, 2, -10, 7, -3, 4, -6, 5, -2, 8, -9, 10, -5, 6, -7, 9, 
 
>   -8]
In[4]:=
DTCode[Knot[10, 97]]
Out[4]=   
DTCode[4, 8, 12, 18, 2, 16, 20, 6, 10, 14]
In[5]:=
br = BR[Knot[10, 97]]
Out[5]=   
BR[5, {1, 1, 2, -1, 2, 1, -3, 2, -1, 2, 3, -4, 3, -4}]
In[6]:=
{First[br], Crossings[br]}
Out[6]=   
{5, 14}
In[7]:=
BraidIndex[Knot[10, 97]]
Out[7]=   
5
In[8]:=
Show[DrawMorseLink[Knot[10, 97]]]
Out[8]=   
 -Graphics- 
In[9]:=
#[Knot[10, 97]]& /@ {SymmetryType, UnknottingNumber, ThreeGenus, BridgeIndex, SuperBridgeIndex, NakanishiIndex}
Out[9]=   
{Reversible, 2, 2, 3, NotAvailable, 1}
In[10]:=
alex = Alexander[Knot[10, 97]][t]
Out[10]=   
      5    22             2
-33 - -- + -- + 22 t - 5 t
       2   t
      t
In[11]:=
Conway[Knot[10, 97]][z]
Out[11]=   
       2      4
1 + 2 z  - 5 z
In[12]:=
Select[AllKnots[], (alex === Alexander[#][t])&]
Out[12]=   
{Knot[10, 97]}
In[13]:=
{KnotDet[Knot[10, 97]], KnotSignature[Knot[10, 97]]}
Out[13]=   
{87, 2}
In[14]:=
Jones[Knot[10, 97]][q]
Out[14]=   
     1             2       3       4       5       6      7      8    9
-3 + - + 7 q - 11 q  + 14 q  - 14 q  + 14 q  - 11 q  + 7 q  - 4 q  + q
     q
In[15]:=
Select[AllKnots[], (J === Jones[#][q] || (J /. q-> 1/q) === Jones[#][q])&]
Out[15]=   
{Knot[10, 97]}
In[16]:=
A2Invariant[Knot[10, 97]][q]
Out[16]=   
      -4    -2      2      4    6      8      10      12      14      16
-1 + q   - q   + 4 q  - 2 q  + q  + 2 q  - 2 q   + 2 q   - 2 q   + 2 q   + 
 
     18      20      22      24      26    28
>   q   - 2 q   + 3 q   - 2 q   - 2 q   + q
In[17]:=
HOMFLYPT[Knot[10, 97]][a, z]
Out[17]=   
                            2      2      2      2    4      4    4
  -8   2    2    2     2   z    2 z    4 z    2 z    z    3 z    z
-a   + -- - -- + -- + z  + -- + ---- - ---- + ---- - -- - ---- - --
        6    4    2         8     6      4      2     6     4     2
       a    a    a         a     a      a      a     a     a     a
In[18]:=
Kauffman[Knot[10, 97]][a, z]
Out[18]=   
                                              2     2      2       2      2
  -8   2    2    2    4 z   6 z   2 z    2   z     z    3 z    10 z    6 z
-a   - -- - -- - -- - --- - --- - --- - z  + --- + -- + ---- + ----- + ---- + 
        6    4    2    7     5     3          10    8     6      4       2
       a    a    a    a     a     a          a     a     a      a       a
 
       3       3       3       3      3           4      4      4      4
    8 z    20 z    24 z    10 z    2 z     4   2 z    4 z    5 z    9 z
>   ---- + ----- + ----- + ----- - ---- + z  - ---- + ---- + ---- - ---- - 
      9      7       5       3      a           10      8      6      4
     a      a       a       a                  a       a      a      a
 
       4       5       5       5       5      5    6        6       6      6
    7 z    11 z    28 z    32 z    12 z    3 z    z     11 z    21 z    3 z
>   ---- - ----- - ----- - ----- - ----- + ---- + --- - ----- - ----- - ---- + 
      2      9       7       5       3      a      10     8       6       4
     a      a       a       a       a             a      a       a       a
 
       6      7      7       7      7      8       8      8      9      9
    6 z    4 z    7 z    11 z    8 z    5 z    11 z    6 z    2 z    2 z
>   ---- + ---- + ---- + ----- + ---- + ---- + ----- + ---- + ---- + ----
      2      9      7      5       3      8      6       4      7      5
     a      a      a      a       a      a      a       a      a      a
In[19]:=
{Vassiliev[2][Knot[10, 97]], Vassiliev[3][Knot[10, 97]]}
Out[19]=   
{2, 4}
In[20]:=
Kh[Knot[10, 97]][q, t]
Out[20]=   
         3     1      2    q      3        5        5  2      7  2      7  3
5 q + 3 q  + ----- + --- + - + 7 q  t + 4 q  t + 7 q  t  + 7 q  t  + 7 q  t  + 
              3  2   q t   t
             q  t
 
       9  3      9  4      11  4      11  5      13  5      13  6      15  6
>   7 q  t  + 7 q  t  + 7 q   t  + 4 q   t  + 7 q   t  + 3 q   t  + 4 q   t  + 
 
     15  7      17  7    19  8
>   q   t  + 3 q   t  + q   t
In[21]:=
ColouredJones[Knot[10, 97], 2][q]
Out[21]=   
       -4   3    3    5              2       3       4       5        6
-19 + q   - -- + -- + - + 18 q + 20 q  - 65 q  + 43 q  + 60 q  - 130 q  + 
             3    2   q
            q    q
 
        7        8        9       10        11        12    13        14
>   53 q  + 113 q  - 172 q  + 36 q   + 148 q   - 165 q   + q   + 148 q   - 
 
         15       16        17       18       19       20       21       22
>   119 q   - 30 q   + 112 q   - 57 q   - 37 q   + 57 q   - 12 q   - 21 q   + 
 
        23    24      25    26
>   15 q   + q   - 4 q   + q


Dror Bar-Natan: The Knot Atlas: The Rolfsen Knot Table: The Knot 1097
10.96
1096
10.98
1098