T(4,3): Difference between revisions

From Knot Atlas
Jump to navigationJump to search
No edit summary
No edit summary
Line 5: Line 5:
<span id="top"></span>
<span id="top"></span>


{{Knot Navigation Links|prev=T(7,2).jpg|next=T(9,2).jpg}}
{{Knot Navigation Links|prev=T(7,2)|next=T(9,2)|imageext=jpg}}


{| align=left
Visit [http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/-3,5,6,-8,-1,3,4,-6,-7,1,2,-4,-5,7,8,-2/goTop.html T(4,3)'s page] at [http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/html/start.html Knotilus]!
|- valign=top
|[[Image:T(4,3).jpg]]
|Visit [http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/-3,5,6,-8,-1,3,4,-6,-7,1,2,-4,-5,7,8,-2/goTop.html T(4,3)'s page] at [http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/html/start.html Knotilus]!


Visit [http://www.math.toronto.edu/~drorbn/KAtlas/TorusKnots/4.3.html T(4,3)'s page] at the original [http://www.math.toronto.edu/~drorbn/KAtlas/index.html Knot Atlas]!
Visit [http://www.math.toronto.edu/~drorbn/KAtlas/TorusKnots/4.3.html T(4,3)'s page] at the original [http://www.math.toronto.edu/~drorbn/KAtlas/index.html Knot Atlas]!

{{:T(4,3) Quick Notes}}
|}

<br style="clear:both" />

{{:T(4,3) Further Notes and Views}}


===Knot presentations===
===Knot presentations===
Line 23: Line 33:
|style="padding-left: 1em;" | 6 -8 10 -12 14 -16 2 -4
|style="padding-left: 1em;" | 6 -8 10 -12 14 -16 2 -4
|}
|}

===Polynomial invariants===


{{Polynomial Invariants|name=T(4,3)}}
{{Polynomial Invariants|name=T(4,3)}}
Line 32: Line 40:
|-
|-
|'''V<sub>2</sub> and V<sub>3</sub>'''
|'''V<sub>2</sub> and V<sub>3</sub>'''
|style="padding-left: 1em;" | {0, 10})
|style="padding-left: 1em;" | {0, 10}
|}
|}


===[[Khovanov Homology]]===
[[Khovanov Homology]]. The coefficients of the monomials <math>t^rq^j</math> are shown, along with their alternating sums <math>\chi</math> (fixed <math>j</math>, alternation over <math>r</math>). The squares with <font class=HLYellow>yellow</font> highlighting are those on the "critical diagonals", where <math>j-2r=s+1</math> or <math>j-2r=s+1</math>, where <math>s=</math>6 is the signature of T(4,3). Nonzero entries off the critical diagonals (if any exist) are highlighted in <font class=HLRed>red</font>.

The coefficients of the monomials <math>t^rq^j</math> are shown, along with their alternating sums <math>\chi</math> (fixed <math>j</math>, alternation over <math>r</math>). The squares with <font class=HLYellow>yellow</font> highlighting are those on the "critical diagonals", where <math>j-2r=s+1</math> or <math>j-2r=s+1</math>, where <math>s=</math>6 is the signature of T(4,3). Nonzero entries off the critical diagonals (if any exist) are highlighted in <font class=HLRed>red</font>.


<center><table border=1>
<center><table border=1>
Line 63: Line 73:
<tr valign=top><td colspan=2><pre style="border: 0px; padding: 0em">Loading KnotTheory` (version of August 19, 2005, 13:11:25)...</pre></td></tr>
<tr valign=top><td colspan=2><pre style="border: 0px; padding: 0em">Loading KnotTheory` (version of August 19, 2005, 13:11:25)...</pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[2]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Crossings[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[2]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Crossings[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[2]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>8</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[2]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>8</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[3]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>PD[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[3]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>PD[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[3]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>PD[X[5, 11, 6, 10], X[16, 12, 1, 11], X[1, 7, 2, 6], X[12, 8, 13, 7],
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[3]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>PD[X[5, 11, 6, 10], X[16, 12, 1, 11], X[1, 7, 2, 6], X[12, 8, 13, 7],
X[13, 3, 14, 2], X[8, 4, 9, 3], X[9, 15, 10, 14], X[4, 16, 5, 15]]</nowiki></pre></td></tr>
X[13, 3, 14, 2], X[8, 4, 9, 3], X[9, 15, 10, 14], X[4, 16, 5, 15]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[4]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>GaussCode[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[4]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>GaussCode[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[4]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>GaussCode[-3, 5, 6, -8, -1, 3, 4, -6, -7, 1, 2, -4, -5, 7, 8, -2]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[4]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>GaussCode[-3, 5, 6, -8, -1, 3, 4, -6, -7, 1, 2, -4, -5, 7, 8, -2]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[5]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>BR[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[5]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>BR[TorusKnot[4, 3]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[5]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>BR[3, {1, 2, 1, 2, 1, 2, 1, 2}]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[5]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>BR[3, {1, 2, 1, 2, 1, 2, 1, 2}]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[6]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>alex = Alexander[TorusKnot[4, 3]][t]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[6]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>alex = Alexander[TorusKnot[4, 3]][t]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[6]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -3 -2 2 3
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[6]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -3 -2 2 3
1 + t - t - t + t</nowiki></pre></td></tr>
1 + t - t - t + t</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[7]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Conway[TorusKnot[4, 3]][z]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[7]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Conway[TorusKnot[4, 3]][z]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[7]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 2 4 6
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[7]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 2 4 6
1 + 5 z + 5 z + z</nowiki></pre></td></tr>
1 + 5 z + 5 z + z</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[8]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Select[AllKnots[], (alex === Alexander[#][t])&]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[8]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Select[AllKnots[], (alex === Alexander[#][t])&]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[8]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{Knot[8, 19]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[8]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{Knot[8, 19]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[9]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>{KnotDet[TorusKnot[4, 3]], KnotSignature[TorusKnot[4, 3]]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[9]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>{KnotDet[TorusKnot[4, 3]], KnotSignature[TorusKnot[4, 3]]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[9]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{3, 6}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[9]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{3, 6}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[10]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>J=Jones[TorusKnot[4, 3]][q]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[10]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>J=Jones[TorusKnot[4, 3]][q]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[10]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 3 5 8
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[10]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 3 5 8
q + q - q</nowiki></pre></td></tr>
q + q - q</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[11]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Select[AllKnots[], (J === Jones[#][q] || (J /. q-> 1/q) === Jones[#][q])&]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[11]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Select[AllKnots[], (J === Jones[#][q] || (J /. q-> 1/q) === Jones[#][q])&]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[11]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{Knot[8, 19]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[11]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{Knot[8, 19]}</nowiki></pre></td></tr>
Include[ColouredJonesM.mhtml]
Include[ColouredJonesM.mhtml]
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[12]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>A2Invariant[TorusKnot[4, 3]][q]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[12]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>A2Invariant[TorusKnot[4, 3]][q]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[12]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 10 12 14 16 18 22 24 26 28 32
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[12]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 10 12 14 16 18 22 24 26 28 32
q + q + 2 q + 2 q + 2 q - q - 2 q - 2 q - q + q</nowiki></pre></td></tr>
q + q + 2 q + 2 q + 2 q - q - 2 q - 2 q - q + q</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[13]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Kauffman[TorusKnot[4, 3]][a, z]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[13]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Kauffman[TorusKnot[4, 3]][a, z]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[13]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 2 2 3 3 4
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[13]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 2 2 3 3 4
-10 5 5 5 z 5 z 10 z 10 z 5 z 5 z 6 z
-10 5 5 5 z 5 z 10 z 10 z 5 z 5 z 6 z
-a - -- - -- + --- + --- + ----- + ----- - ---- - ---- - ---- -
-a - -- - -- + --- + --- + ----- + ----- - ---- - ---- - ---- -
Line 104: Line 114:
a a a a a</nowiki></pre></td></tr>
a a a a a</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[14]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>{Vassiliev[2][TorusKnot[4, 3]], Vassiliev[3][TorusKnot[4, 3]]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[14]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>{Vassiliev[2][TorusKnot[4, 3]], Vassiliev[3][TorusKnot[4, 3]]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[14]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{0, 10}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[14]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{0, 10}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[15]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Kh[TorusKnot[4, 3]][q, t]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>In[15]:=</nowiki></pre></td><td><pre style="color: red; border: 0px; padding: 0em"><nowiki>Kh[TorusKnot[4, 3]][q, t]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[15]=&nbsp;&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 5 7 9 2 13 3 11 4 13 4 15 5 17 5
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[15]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 5 7 9 2 13 3 11 4 13 4 15 5 17 5
q + q + q t + q t + q t + q t + q t + q t</nowiki></pre></td></tr>
q + q + q t + q t + q t + q t + q t + q t</nowiki></pre></td></tr>
</table>
</table>

Revision as of 22:45, 26 August 2005


[[Image:T(7,2).{{{ext}}}|80px|link=T(7,2)]]

T(7,2)

[[Image:T(9,2).{{{ext}}}|80px|link=T(9,2)]]

T(9,2)

T(4,3).jpg Visit T(4,3)'s page at Knotilus!

Visit T(4,3)'s page at the original Knot Atlas!

See also 8_19.


T(4,3) Further Notes and Views

Knot presentations

Planar diagram presentation X5,11,6,10 X16,12,1,11 X1726 X12,8,13,7 X13,3,14,2 X8493 X9,15,10,14 X4,16,5,15
Gauss code {-3, 5, 6, -8, -1, 3, 4, -6, -7, 1, 2, -4, -5, 7, 8, -2}
Dowker-Thistlethwaite code 6 -8 10 -12 14 -16 2 -4

Polynomial invariants

Alexander polynomial
Conway polynomial
2nd Alexander ideal (db, data sources)
Determinant and Signature { 3, 6 }
Jones polynomial
HOMFLY-PT polynomial (db, data sources)
Kauffman polynomial (db, data sources)
The A2 invariant Data:T(4,3)/QuantumInvariant/A2/1,0
The G2 invariant Data:T(4,3)/QuantumInvariant/G2/1,0

Vassiliev invariants

V2 and V3 {0, 10}

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 6 is the signature of T(4,3). Nonzero entries off the critical diagonals (if any exist) are highlighted in red.

\ r
  \  
j \
012345χ
17     1-1
15     1-1
13   11 0
11    1 1
9  1   1
71     1
51     1

Computer Talk

Much of the above data can be recomputed by Mathematica using the package KnotTheory`. See A Sample KnotTheory` Session.

Include[ColouredJonesM.mhtml]

In[1]:=    
<< KnotTheory`
Loading KnotTheory` (version of August 19, 2005, 13:11:25)...
In[2]:=
Crossings[TorusKnot[4, 3]]
Out[2]=  
8
In[3]:=
PD[TorusKnot[4, 3]]
Out[3]=  
PD[X[5, 11, 6, 10], X[16, 12, 1, 11], X[1, 7, 2, 6], X[12, 8, 13, 7], 
  X[13, 3, 14, 2], X[8, 4, 9, 3], X[9, 15, 10, 14], X[4, 16, 5, 15]]
In[4]:=
GaussCode[TorusKnot[4, 3]]
Out[4]=  
GaussCode[-3, 5, 6, -8, -1, 3, 4, -6, -7, 1, 2, -4, -5, 7, 8, -2]
In[5]:=
BR[TorusKnot[4, 3]]
Out[5]=  
BR[3, {1, 2, 1, 2, 1, 2, 1, 2}]
In[6]:=
alex = Alexander[TorusKnot[4, 3]][t]
Out[6]=  
     -3    -2    2    3
1 + t   - t   - t  + t
In[7]:=
Conway[TorusKnot[4, 3]][z]
Out[7]=  
       2      4    6
1 + 5 z  + 5 z  + z
In[8]:=
Select[AllKnots[], (alex === Alexander[#][t])&]
Out[8]=  
{Knot[8, 19]}
In[9]:=
{KnotDet[TorusKnot[4, 3]], KnotSignature[TorusKnot[4, 3]]}
Out[9]=  
{3, 6}
In[10]:=
J=Jones[TorusKnot[4, 3]][q]
Out[10]=  
 3    5    8
q  + q  - q
In[11]:=
Select[AllKnots[], (J === Jones[#][q] || (J /. q-> 1/q) === Jones[#][q])&]
Out[11]=  
{Knot[8, 19]}
In[12]:=
A2Invariant[TorusKnot[4, 3]][q]
Out[12]=  
 10    12      14      16      18    22      24      26    28    32
q   + q   + 2 q   + 2 q   + 2 q   - q   - 2 q   - 2 q   - q   + q
In[13]:=
Kauffman[TorusKnot[4, 3]][a, z]
Out[13]=  
                                  2       2      3      3      4
 -10   5    5    5 z   5 z   10 z    10 z    5 z    5 z    6 z

-a - -- - -- + --- + --- + ----- + ----- - ---- - ---- - ---- -

        8    6    9     7      8       6       9      7      8
       a    a    a     a      a       a       a      a      a

    4    5    5    6    6
 6 z    z    z    z    z
 ---- + -- + -- + -- + --
   6     9    7    8    6
a a a a a
In[14]:=
{Vassiliev[2][TorusKnot[4, 3]], Vassiliev[3][TorusKnot[4, 3]]}
Out[14]=  
{0, 10}
In[15]:=
Kh[TorusKnot[4, 3]][q, t]
Out[15]=  
 5    7    9  2    13  3    11  4    13  4    15  5    17  5
q  + q  + q  t  + q   t  + q   t  + q   t  + q   t  + q   t