Burau's Theorem: Difference between revisions

From Knot Atlas
Jump to navigationJump to search
No edit summary
No edit summary
 
(8 intermediate revisions by one other user not shown)
Line 5: Line 5:
{{Startup Note}}
{{Startup Note}}


<!--$$Import["http://katlas.org/w/index.php?title=CableComponent.m&action=raw"];$$-->
{{In|n=2|in=**** Enter the same definition for <code>CableComponent</code> as in [[Cabling]] **** }}
<!--Robot Land, no human edits to "END"-->
{{In|
n = 2 |
in = <nowiki>Import["http://katlas.org/w/index.php?title=CableComponent.m&action=raw"];</nowiki>}}
<!--END-->


<!--$$(cc = CableComponent[BR[6, {1, 2, 3, 4, 5}],
<!--$$(cc = CableComponent[BR[6, {1, 2, 3, 4, 5}],
Line 12: Line 17:
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{Graphics|
{{Graphics|
n = 2 |
n = 3 |
in = <nowiki>(cc = CableComponent[BR[6, {1, 2, 3, 4, 5}],
in = <nowiki>(cc = CableComponent[BR[6, {1, 2, 3, 4, 5}],
K = Mirror[Knot[11, NonAlternating, 52]]]) // DrawMorseLink
K = Mirror[Knot[11, NonAlternating, 52]]]) // DrawMorseLink
</nowiki> |
</nowiki> |
img= User_IvaH_Examples2_Out_2.gif |
img= Buraus_Theorem_Out_3.gif |
out= <nowiki>-Graphics-</nowiki>}}
out= <nowiki>-Graphics-</nowiki>}}
<!--END-->
<!--END-->
Line 23: Line 28:
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
{{InOut|
n = 3 |
n = 4 |
in = <nowiki>Alexander[#][t] & /@ {cc, K}</nowiki> |
in = <nowiki>Alexander[#][t] & /@ {cc, K}</nowiki> |
out= <nowiki> -18 6 14 6 12 18
out= <nowiki> -18 6 14 6 12 18

Latest revision as of 14:07, 20 October 2013


An interesting property of the Alexander polynomial related to cables is Burau's theorem which says the following: If we take the -th cable of a knot from the Knot Atlas and insert in it a braid with of a full twist, the Alexander polynomial of the result with respect to is the same as the Alexander polynomial of the original knot with respect to . This can only be seen if we take into consideration the writhe of the knot and add the appropriate number of twists ( full twists) in the direction opposite to the sign of the writhe. We can test the theorem using the program CableComponent and performing the above operation on knot K11n152, for example.

(For In[1] see Setup)

In[2]:= Import["http://katlas.org/w/index.php?title=CableComponent.m&action=raw"];
In[3]:= (cc = CableComponent[BR[6, {1, 2, 3, 4, 5}], K = Mirror[Knot[11, NonAlternating, 52]]]) // DrawMorseLink
Buraus Theorem Out 3.gif
Out[3]= -Graphics-

It is not immediately clear from the diagram that this is the expected result but we can see that the Alexander polynomial relation holds:

In[4]:= Alexander[#][t] & /@ {cc, K}
Out[4]= -18 6 14 6 12 18 {-17 + t - --- + -- + 14 t - 6 t + t , 12 6 t t -3 6 14 2 3 -17 + t - -- + -- + 14 t - 6 t + t } 2 t t