L5a1 - Revision history

DrorsRobot at 07:58, 3 September 2005

2005-09-03T07:58:49Z

← Older revision		Revision as of 03:58, 3 September 2005
Line 16:		Line 16:
	k = 1 \|		k = 1 \|
	KnotilusURL = http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/1,-4,5,-3:3,-1,2,-5,4,-2/goTop.html \|		KnotilusURL = http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/1,-4,5,-3:3,-1,2,-5,4,-2/goTop.html \|
	braid_table = <table cellspacing=0 cellpadding=0 border=0>		braid_table = <table cellspacing=0 cellpadding=0 border=0 style="white-space: pre">
	<tr><td>[[Image:BraidPart3.gif]][[Image:BraidPart0.gif]][[Image:BraidPart3.gif]][[Image:BraidPart0.gif]][[Image:BraidPart3.gif]]</td></tr>		<tr><td>[[Image:BraidPart3.gif]][[Image:BraidPart0.gif]][[Image:BraidPart3.gif]][[Image:BraidPart0.gif]][[Image:BraidPart3.gif]]</td></tr>
	<tr><td>[[Image:BraidPart4.gif]][[Image:BraidPart1.gif]][[Image:BraidPart4.gif]][[Image:BraidPart1.gif]][[Image:BraidPart4.gif]]</td></tr>		<tr><td>[[Image:BraidPart4.gif]][[Image:BraidPart1.gif]][[Image:BraidPart4.gif]][[Image:BraidPart1.gif]][[Image:BraidPart4.gif]]</td></tr>
Line 43:		Line 43:
	<td align=left><pre style="color: red; border: 0px; padding: 0em"><< KnotTheory`</pre></td>		<td align=left><pre style="color: red; border: 0px; padding: 0em"><< KnotTheory`</pre></td>
	</tr>		</tr>
	<tr valign=top><td colspan=2>Loading KnotTheory` (version of September 2, 2005, 15:8:39)...</td></tr>		<tr valign=top><td colspan=2>Loading KnotTheory` (version of September 3, 2005, 2:11:43)...</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[Link[5, Alternating, 1]]</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[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[2]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>5</nowiki></pre></td></tr>		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[2]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>5</nowiki></pre></td></tr>

DrorsRobot at 23:28, 2 September 2005

2005-09-02T23:28:15Z

← Older revision		Revision as of 19:28, 2 September 2005
Line 16:		Line 16:
	k = 1 \|		k = 1 \|
	KnotilusURL = http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/1,-4,5,-3:3,-1,2,-5,4,-2/goTop.html \|		KnotilusURL = http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/1,-4,5,-3:3,-1,2,-5,4,-2/goTop.html \|
			braid_table = <table cellspacing=0 cellpadding=0 border=0>
			<tr><td>[[Image:BraidPart3.gif]][[Image:BraidPart0.gif]][[Image:BraidPart3.gif]][[Image:BraidPart0.gif]][[Image:BraidPart3.gif]]</td></tr>
			<tr><td>[[Image:BraidPart4.gif]][[Image:BraidPart1.gif]][[Image:BraidPart4.gif]][[Image:BraidPart1.gif]][[Image:BraidPart4.gif]]</td></tr>
			<tr><td>[[Image:BraidPart0.gif]][[Image:BraidPart2.gif]][[Image:BraidPart0.gif]][[Image:BraidPart2.gif]][[Image:BraidPart0.gif]]</td></tr>
			</table> \|
	khovanov_table = <table border=1>		khovanov_table = <table border=1>
	<tr align=center>		<tr align=center>
Line 38:		Line 43:
	<td align=left><pre style="color: red; border: 0px; padding: 0em"><< KnotTheory`</pre></td>		<td align=left><pre style="color: red; border: 0px; padding: 0em"><< KnotTheory`</pre></td>
	</tr>		</tr>
	<tr valign=top><td colspan=2>Loading KnotTheory` (version of ~~August~~ 28, 2005, 22:58:49)...</td></tr>		<tr valign=top><td colspan=2>Loading KnotTheory` (version of September 2, 2005, 15:8:39)...</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[Link[5, Alternating, 1]]</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[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[2]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>5</nowiki></pre></td></tr>		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[2]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>5</nowiki></pre></td></tr>
Line 49:		Line 54:
	<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>GaussCode[Link[5, Alternating, 1]]</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>GaussCode[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[5]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>GaussCode[{1, -4, 5, -3}, {3, -1, 2, -5, 4, -2}]</nowiki></pre></td></tr>		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[5]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>GaussCode[{1, -4, 5, -3}, {3, -1, 2, -5, 4, -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>~~Show[DrawMorseLink~~[Link[5, Alternating, 1]]]</nowiki></pre~~></td></tr><tr><td></td><td align=left>[[Image:L5a1_ML.gif]]</td></tr><tr valign=top><td><tt><font color=blue>Out[6]=</font></tt><td><tt><font color=black>-Graphics-</font></tt~~></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>BR[Link[5, Alternating, 1]]</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>~~KnotSignature~~[~~Link[5~~, ~~Alternating~~, 1]]</nowiki></pre></td></tr>		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[6]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>BR[3, {-1, 2, -1, 2, -1}]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>~~Out~~[7]=~~  ~~</nowiki></pre></td><td><pre style="color: ~~black~~; border: 0px; padding: 0em"><nowiki>-1</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>Show[DrawMorseLink[Link[5, Alternating, 1]]]</nowiki></pre></td></tr><tr><td></td><td align=left>[[Image:L5a1_ML.gif]]</td></tr><tr valign=top><td><tt><font color=blue>Out[7]=</font></tt><td><tt><font color=black>-Graphics-</font></tt></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>~~J=Jones~~[Link[5, Alternating, 1]~~][q~~]</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>KnotSignature[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[8]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -(7/~~2) 2 -(3~~/~~2) 2 3~~/2		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[8]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>-1</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>J=Jones[Link[5, Alternating, 1]][q]</nowiki></pre></td></tr>
			<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[9]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -(7/2) 2 -(3/2) 2 3/2
	q - ---- + q - ------- + Sqrt[q] - q		q - ---- + q - ------- + Sqrt[q] - q
	5/2 Sqrt[q]		5/2 Sqrt[q]
	q</nowiki></pre></td></tr>		q</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>A2Invariant[Link[5, Alternating, 1]][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>A2Invariant[Link[5, Alternating, 1]][q]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[9]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -12 -8 -6 2 -2 2 4 6		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[10]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -12 -8 -6 2 -2 2 4 6
	2 - q + q + q + -- + q + q + q + q		2 - q + q + q + -- + q + q + q + q
	4		4
	q</nowiki></pre></td></tr>		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>HOMFLYPT[Link[5, Alternating, 1]][a, z]</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>HOMFLYPT[Link[5, Alternating, 1]][a, z]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[10]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 1 a z 3 3		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[11]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 1 a z 3 3
	-(---) + - - - + 2 a z - a z + a z		-(---) + - - - + 2 a z - a z + a z
	a z z a</nowiki></pre></td></tr>		a z z a</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>Kauffman[Link[5, Alternating, 1]][a, z]</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>Kauffman[Link[5, Alternating, 1]][a, z]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[11]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 3		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[12]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 3
	1 a 2 z 3 2 4 2 z 3		1 a 2 z 3 2 4 2 z 3
	1 - --- - - + --- + 4 a z + 2 a z + z - a z - -- - 3 a z -		1 - --- - - + --- + 4 a z + 2 a z + z - a z - -- - 3 a z -
Line 74:		Line 81:
	3 3 4 2 4		3 3 4 2 4
	2 a z - z - a z</nowiki></pre></td></tr>		2 a z - z - a z</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>Kh[Link[5, Alternating, 1]][q, t]</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>Kh[Link[5, Alternating, 1]][q, t]</nowiki></pre></td></tr>
	<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[12]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 2 1 1 1 1 4 2		<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[13]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 2 1 1 1 1 4 2
	2 + -- + ----- + ----- + ----- + ---- + t + q t		2 + -- + ----- + ----- + ----- + ---- + t + q t
	2 8 3 6 2 4 2 2		2 8 3 6 2 4 2 2

DrorsRobot at 17:21, 31 August 2005

2005-08-31T17:21:49Z

Show changes

ScottKnotPageRobot at 15:56, 30 August 2005

2005-08-30T15:56:58Z

Show changes

ScottTestRobot at 01:15, 29 August 2005

2005-08-29T01:15:22Z

New page

<span id="top"></span>


{{Knot Navigation Links|ext=gif}}

{{Link Page Header|n=5|t=a|k=1|KnotilusURL=http://srankin.math.uwo.ca/cgi-bin/retrieve.cgi/1,-4,5,-3:3,-1,2,-5,4,-2/goTop.html}}

<br style="clear:both" />

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

{{Link Presentations}}
{{Link Polynomial Invariants}}
{{Vassiliev Invariants}}

{{Khovanov Homology|table=<table border=1>
<tr align=center>
<td width=20.%><table cellpadding=0 cellspacing=0>
<tr><td>\</td><td> </td><td>r</td></tr>
<tr><td> </td><td> \ </td><td> </td></tr>
<tr><td>j</td><td> </td><td>\</td></tr>
</table></td>
<td width=10.%>-3</td ><td width=10.%>-2</td ><td width=10.%>-1</td ><td width=10.%>0</td ><td width=10.%>1</td ><td width=10.%>2</td ><td width=20.%>χ</td></tr>
<tr align=center><td>4</td><td> </td><td> </td><td> </td><td> </td><td> </td><td bgcolor=yellow>1</td><td>1</td></tr>
<tr align=center><td>2</td><td> </td><td> </td><td> </td><td> </td><td bgcolor=yellow> </td><td bgcolor=yellow> </td><td>0</td></tr>
<tr align=center><td>0</td><td> </td><td> </td><td> </td><td bgcolor=yellow>2</td><td bgcolor=yellow>1</td><td> </td><td>1</td></tr>
<tr align=center><td>-2</td><td> </td><td> </td><td bgcolor=yellow>1</td><td bgcolor=yellow>2</td><td> </td><td> </td><td>1</td></tr>
<tr align=center><td>-4</td><td> </td><td bgcolor=yellow>1</td><td bgcolor=yellow> </td><td> </td><td> </td><td> </td><td>1</td></tr>
<tr align=center><td>-6</td><td bgcolor=yellow> </td><td bgcolor=yellow>1</td><td> </td><td> </td><td> </td><td> </td><td>1</td></tr>
<tr align=center><td>-8</td><td bgcolor=yellow>1</td><td> </td><td> </td><td> </td><td> </td><td> </td><td>-1</td></tr>
</table>}}

{{Computer Talk Header}}

<table>
<tr valign=top>
<td><pre style="color: blue; border: 0px; padding: 0em">In[1]:=    </pre></td>
<td align=left><pre style="color: red; border: 0px; padding: 0em"><< 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[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[2]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>5</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[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[3]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>PD[X[6, 1, 7, 2], X[10, 7, 5, 8], X[4, 5, 1, 6], X[2, 10, 3, 9],

X[8, 4, 9, 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[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[4]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>GaussCode[{1, -4, 5, -3}, {3, -1, 2, -5, 4, -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[Link[5, Alternating, 1]]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[5]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>BR[Link[5, Alternating, 1]]</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[Link[5, Alternating, 1]][t]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[6]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>ComplexInfinity</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[Link[5, Alternating, 1]][z]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[7]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>ComplexInfinity</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]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{}</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[Link[5, Alternating, 1]], KnotSignature[Link[5, Alternating, 1]]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[9]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{Infinity, -1}</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[Link[5, Alternating, 1]][q]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[10]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -(7/2) 2 -(3/2) 2 3/2
q - ---- + q - ------- + Sqrt[q] - q
5/2 Sqrt[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]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki>{}</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[Link[5, Alternating, 1]][q]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[12]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> -12 -8 -6 2 -2 2 4 6
2 - q + q + q + -- + q + q + q + q
4
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[Link[5, Alternating, 1]][a, z]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[13]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 3
1 a 2 z 3 2 4 2 z 3
1 - --- - - + --- + 4 a z + 2 a z + z - a z - -- - 3 a z -
a z z a a

3 3 4 2 4
2 a z - z - a z</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][Link[5, Alternating, 1]], Vassiliev[3][Link[5, Alternating, 1]]}</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[14]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 1
{0, -}
2</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[Link[5, Alternating, 1]][q, t]</nowiki></pre></td></tr>
<tr valign=top><td><pre style="color: blue; border: 0px; padding: 0em"><nowiki>Out[15]=  </nowiki></pre></td><td><pre style="color: black; border: 0px; padding: 0em"><nowiki> 2 1 1 1 1 4 2
2 + -- + ----- + ----- + ----- + ---- + t + q t
2 8 3 6 2 4 2 2
q q t q t q t q t</nowiki></pre></td></tr>
</table>

[[Category:Knot Page]]