7 4: Difference between revisions

From Knot Atlas
Jump to navigationJump to search
(Resetting knot page to basic template.)
 
No edit summary
Line 1: Line 1:
<!-- -->
{{Template:Basic Knot Invariants|name=7_4}}

<!-- provide an anchor so we can return to the top of the page -->
<span id="top"></span>

<!-- this relies on transclusion for next and previous links -->
{{Knot Navigation Links|ext=gif}}

{| align=left
|- valign=top
|[[Image:{{PAGENAME}}.gif]]
|{{Rolfsen Knot Site Links|n=7|k=4|KnotilusURL=http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/1,-5,6,-7,2,-1,3,-4,7,-6,5,-2,4,-3/goTop.html}}
|{{:{{PAGENAME}} Quick Notes}}
|}

<br style="clear:both" />

{{:{{PAGENAME}} Further Notes and Views}}

{{Knot Presentations}}
{{3D Invariants}}
{{4D Invariants}}
{{Polynomial Invariants}}
{{Vassiliev Invariants}}

===[[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>{{Data:{{PAGENAME}}/Signature}} is the signature of {{PAGENAME}}. Nonzero entries off the critical diagonals (if any exist) are highlighted in <font class=HLRed>red</font>.

<center><table border=1>
<tr align=center>
<td width=16.6667%><table cellpadding=0 cellspacing=0>
<tr><td>\</td><td>&nbsp;</td><td>r</td></tr>
<tr><td>&nbsp;</td><td>&nbsp;\&nbsp;</td><td>&nbsp;</td></tr>
<tr><td>j</td><td>&nbsp;</td><td>\</td></tr>
</table></td>
<td width=8.33333%>0</td ><td width=8.33333%>1</td ><td width=8.33333%>2</td ><td width=8.33333%>3</td ><td width=8.33333%>4</td ><td width=8.33333%>5</td ><td width=8.33333%>6</td ><td width=8.33333%>7</td ><td width=16.6667%>&chi;</td></tr>
<tr align=center><td>17</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td bgcolor=yellow>1</td><td>-1</td></tr>
<tr align=center><td>15</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td bgcolor=yellow>&nbsp;</td><td bgcolor=yellow>&nbsp;</td><td>0</td></tr>
<tr align=center><td>13</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td bgcolor=yellow>2</td><td bgcolor=yellow>1</td><td>&nbsp;</td><td>-1</td></tr>
<tr align=center><td>11</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td bgcolor=yellow>1</td><td bgcolor=yellow>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>1</td></tr>
<tr align=center><td>9</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td bgcolor=yellow>1</td><td bgcolor=yellow>2</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>1</td></tr>
<tr align=center><td>7</td><td>&nbsp;</td><td>&nbsp;</td><td bgcolor=yellow>2</td><td bgcolor=yellow>1</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>1</td></tr>
<tr align=center><td>5</td><td>&nbsp;</td><td bgcolor=yellow>&nbsp;</td><td bgcolor=yellow>1</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>1</td></tr>
<tr align=center><td>3</td><td bgcolor=yellow>1</td><td bgcolor=yellow>2</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>-1</td></tr>
<tr align=center><td>1</td><td bgcolor=yellow>1</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td><td>1</td></tr>
</table></center>

{{Computer Talk Header}}

<table>
<tr valign=top>
<td><pre style="color: blue; border: 0px; padding: 0em">In[1]:=&nbsp;&nbsp;&nbsp;&nbsp;</pre></td>
<td align=left><pre style="color: red; border: 0px; padding: 0em">&lt;&lt; KnotTheory`</pre></td>
</tr>
<tr valign=top><td colspan=2><pre style="border: 0px; padding: 0em">Loading KnotTheory` (version of August 17, 2005, 14:44:34)...</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[Knot[7, 4]]</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>7</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[Knot[7, 4]]</nowiki></pre></td></tr>
<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[6, 2, 7, 1], X[12, 6, 13, 5], X[14, 8, 1, 7], X[8, 14, 9, 13],
X[2, 12, 3, 11], X[10, 4, 11, 3], X[4, 10, 5, 9]]</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[Knot[7, 4]]</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[1, -5, 6, -7, 2, -1, 3, -4, 7, -6, 5, -2, 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[Knot[7, 4]]</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[4, {1, 1, 2, -1, 2, 2, 3, -2, 3}]</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[Knot[7, 4]][t]</nowiki></pre></td></tr>
<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> 4
-7 + - + 4 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[Knot[7, 4]][z]</nowiki></pre></td></tr>
<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
1 + 4 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>Out[8]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{Knot[7, 4], Knot[9, 2]}</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[Knot[7, 4]], KnotSignature[Knot[7, 4]]}</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>{15, 2}</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[Knot[7, 4]][q]</nowiki></pre></td></tr>
<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> 2 3 4 5 6 7 8
q - 2 q + 3 q - 2 q + 3 q - 2 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>Out[11]=&nbsp;&nbsp;</nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{Knot[7, 4]}</nowiki></pre></td></tr>
<math>\textrm{Include}(\textrm{ColouredJonesM.mhtml})</math>
<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[Knot[7, 4]][q]</nowiki></pre></td></tr>
<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> 2 4 8 10 12 14 16 20 24 26
q - q + q + q + 2 q + q + q - 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[Knot[7, 4]][a, z]</nowiki></pre></td></tr>
<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 2 2 3 3 3
-8 2 4 z 4 z 2 z 3 z 4 z z 4 z 8 z 2 z
-a + -- + --- + --- + ---- - ---- - ---- + -- - ---- - ---- - ---- +
4 9 7 8 6 4 2 9 7 5
a a a a a a a a a a
3 4 4 5 5 5 6 6
2 z 3 z 3 z z 3 z 2 z z z
---- - ---- + ---- + -- + ---- + ---- + -- + --
3 8 4 9 7 5 8 6
a a a 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][Knot[7, 4]], Vassiliev[3][Knot[7, 4]]}</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, 8}</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[Knot[7, 4]][q, t]</nowiki></pre></td></tr>
<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> 3 3 5 2 7 2 7 3 9 3 9 4 11 4
q + q + 2 q t + q t + 2 q t + q t + q t + 2 q t + q t +
13 5 13 6 17 7
2 q t + q t + q t</nowiki></pre></td></tr>
</table>

Revision as of 20:42, 27 August 2005


7 3.gif

7_3

7 5.gif

7_5

7 4.gif Visit 7 4's page at the Knot Server (KnotPlot driven, includes 3D interactive images!)

Visit 7 4's page at Knotilus!

Visit 7 4's page at the original Knot Atlas!

Simplest version of Endless knot symbol.



Celtic or pseudo-Celtic knot
Mongolian ornament
Susan Williams' medallion [1], the "Endless knot" of Buddhism [2]
Ornamental "Endless knot"
a knot seen at the Castle of Kornik [3]
A 7-4 knot reduced from TakaraMusubi with 9 crossings [4]
TakaraMusubi knot seen in Japanese symbols, or Kolam in South India [5]
Buddhist Endless Knot
Ornamental Endless Knot
Albrecht Dürer knot, 16th-century
A laser cut by Tom Longtin [6]
Unicursal hexagram of occultism
Logo of the raelian sect
Lissajous curve : x=cos 3t , y=sin 2t, z=sin 7t
French europa stamp 2023


Knot presentations

Planar diagram presentation X6271 X12,6,13,5 X14,8,1,7 X8,14,9,13 X2,12,3,11 X10,4,11,3 X4,10,5,9
Gauss code 1, -5, 6, -7, 2, -1, 3, -4, 7, -6, 5, -2, 4, -3
Dowker-Thistlethwaite code 6 10 12 14 4 2 8
Conway Notation [313]

Three dimensional invariants

Symmetry type Reversible
Unknotting number 2
3-genus 1
Bridge index 2
Super bridge index
Nakanishi index 1
Maximal Thurston-Bennequin number Failed to parse (syntax error): {\displaystyle \text{$\$$Failed}}
Hyperbolic Volume 5.13794
A-Polynomial See Data:7 4/A-polynomial

[edit Notes for 7 4's three dimensional invariants]

Four dimensional invariants

Smooth 4 genus
Topological 4 genus
Concordance genus
Rasmussen s-Invariant -2

[edit Notes for 7 4's four dimensional invariants]

Polynomial invariants

Alexander polynomial
Conway polynomial
2nd Alexander ideal (db, data sources)
Determinant and Signature { 15, 2 }
Jones polynomial
HOMFLY-PT polynomial (db, data sources)
Kauffman polynomial (db, data sources)
The A2 invariant
The G2 invariant

Vassiliev invariants

V2 and V3: (4, 8)
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

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.

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

\ r
  \  
j \
01234567χ
17       1-1
15        0
13     21 -1
11    1   1
9   12   1
7  21    1
5  1     1
312      -1
11       1

Computer Talk

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

In[1]:=    
<< KnotTheory`
Loading KnotTheory` (version of August 17, 2005, 14:44:34)...
In[2]:=
Crossings[Knot[7, 4]]
Out[2]=  
7
In[3]:=
PD[Knot[7, 4]]
Out[3]=  
PD[X[6, 2, 7, 1], X[12, 6, 13, 5], X[14, 8, 1, 7], X[8, 14, 9, 13], 
  X[2, 12, 3, 11], X[10, 4, 11, 3], X[4, 10, 5, 9]]
In[4]:=
GaussCode[Knot[7, 4]]
Out[4]=  
GaussCode[1, -5, 6, -7, 2, -1, 3, -4, 7, -6, 5, -2, 4, -3]
In[5]:=
BR[Knot[7, 4]]
Out[5]=  
BR[4, {1, 1, 2, -1, 2, 2, 3, -2, 3}]
In[6]:=
alex = Alexander[Knot[7, 4]][t]
Out[6]=  
     4

-7 + - + 4 t

t
In[7]:=
Conway[Knot[7, 4]][z]
Out[7]=  
       2
1 + 4 z
In[8]:=
Select[AllKnots[], (alex === Alexander[#][t])&]
Out[8]=  
{Knot[7, 4], Knot[9, 2]}
In[9]:=
{KnotDet[Knot[7, 4]], KnotSignature[Knot[7, 4]]}
Out[9]=  
{15, 2}
In[10]:=
J=Jones[Knot[7, 4]][q]
Out[10]=  
       2      3      4      5      6    7    8
q - 2 q  + 3 q  - 2 q  + 3 q  - 2 q  + q  - q
In[11]:=
Select[AllKnots[], (J === Jones[#][q] || (J /. q-> 1/q) === Jones[#][q])&]
Out[11]=  
{Knot[7, 4]}
In[12]:=
A2Invariant[Knot[7, 4]][q]
Out[12]=  
 2    4    8    10      12    14    16    20    24    26
q  - q  + q  + q   + 2 q   + q   + q   - q   - q   - q
In[13]:=
Kauffman[Knot[7, 4]][a, z]
Out[13]=  
                           2      2      2    2      3      3      3
 -8   2    4 z   4 z   2 z    3 z    4 z    z    4 z    8 z    2 z

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

       4    9     7      8      6      4     2     9      7      5
      a    a     a      a      a      a     a     a      a      a

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

q + q + 2 q t + q t + 2 q t + q t + q t + 2 q t + q t +

    13  5    13  6    17  7
2 q t + q t + q t