The Determinant and the Signature: Difference between revisions

From Knot Atlas
Jump to navigationJump to search
No edit summary
No edit summary
Line 4: Line 4:
<!--$$?KnotDet$$-->
<!--$$?KnotDet$$-->
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{Help1|n=1|s=KnotDet}}
n = 1 |
KnotDet[K] returns the determinant of a knot K.
in = <nowiki>KnotDet</nowiki> |
{{Help2}}
out= <nowiki>KnotDet[K] returns the determinant of a knot K.</nowiki>}}
<!--END-->
<!--END-->


<!--$$?KnotSignature$$-->
<!--$$?KnotSignature$$-->
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{Help1|n=2|s=KnotSignature}}
n = 2 |
KnotSignature[K] returns the signature of a knot K.
in = <nowiki>KnotSignature</nowiki> |
{{Help2}}
out= <nowiki>KnotSignature[K] returns the signature of a knot K.</nowiki>}}
<!--END-->
<!--END-->


Line 25: Line 27:
<!--$$KnotDet /@ {Knot[5, 1], Knot[10, 132]}$$-->
<!--$$KnotDet /@ {Knot[5, 1], Knot[10, 132]}$$-->
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{InOut1|n=3}}
{{InOut|
n = 3 |
<pre style="color: red; border: 0px; padding: 0em"><nowiki>KnotDet /@ {Knot[5, 1], Knot[10, 132]}</nowiki></pre>
{{InOut2|n=3}}<pre style="border: 0px; padding: 0em"><nowiki>{5, 5}</nowiki></pre>
in = <nowiki>KnotDet /@ {Knot[5, 1], Knot[10, 132]}</nowiki> |
out= <nowiki>{5, 5}</nowiki>}}
{{InOut3}}
<!--END-->
<!--END-->


<!--$${Equal @@ (Jones[#][q]& /@ {Knot[5, 1], Knot[10, 132]}), Equal @@ (Alexander[#][t]& /@ {Knot[5, 1], Knot[10, 132]})}$$-->
<!--$${Equal @@ (Jones[#][q]& /@ {Knot[5, 1], Knot[10, 132]}), Equal @@ (Alexander[#][t]& /@ {Knot[5, 1], Knot[10, 132]})}$$-->
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{InOut1|n=4}}
{{InOut|
n = 4 |
<pre style="color: red; border: 0px; padding: 0em"><nowiki>{Equal @@ (Jones[#][q]& /@ {Knot[5, 1], Knot[10, 132]}), Equal @@ (Alexander[#][t]& /@ {Knot[5, 1], Knot[10, 132]})}</nowiki></pre>
in = <nowiki>{Equal @@ (Jones[#][q]& /@ {Knot[5, 1], Knot[10, 132]}), Equal @@ (Alexander[#][t]& /@ {Knot[5, 1], Knot[10, 132]})}</nowiki> |
{{InOut2|n=4}}<pre style="border: 0px; padding: 0em"><nowiki>{True, True}</nowiki></pre>
out= <nowiki>{True, True}</nowiki>}}
{{InOut3}}
<!--END-->
<!--END-->


<!--$$KnotSignature /@ {Knot[5, 1], Knot[10, 132]}$$-->
<!--$$KnotSignature /@ {Knot[5, 1], Knot[10, 132]}$$-->
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{InOut1|n=5}}
{{InOut|
n = 5 |
<pre style="color: red; border: 0px; padding: 0em"><nowiki>KnotSignature /@ {Knot[5, 1], Knot[10, 132]}</nowiki></pre>
in = <nowiki>KnotSignature /@ {Knot[5, 1], Knot[10, 132]}</nowiki> |
{{InOut2|n=5}}<pre style="border: 0px; padding: 0em"><nowiki>{-4, 0}</nowiki></pre>
out= <nowiki>{-4, 0}</nowiki>}}
{{InOut3}}
<!--END-->
<!--END-->

Revision as of 13:00, 30 August 2005


(For In[1] see Setup)

In[1]:= ?KnotDet
KnotDet[K] returns the determinant of a knot K.
In[2]:= ?KnotSignature
KnotSignature[K] returns the signature of a knot K.

Thus, for example, the knots 5_1 and 10_132 have the same determinant (and even the same Alexander and Jones polynomials), but different signatures:

In[3]:= KnotDet /@ {Knot[5, 1], Knot[10, 132]}
Out[3]= {5, 5}
In[4]:= {Equal @@ (Jones[#][q]& /@ {Knot[5, 1], Knot[10, 132]}), Equal @@ (Alexander[#][t]& /@ {Knot[5, 1], Knot[10, 132]})}
Out[4]= {True, True}
In[5]:= KnotSignature /@ {Knot[5, 1], Knot[10, 132]}
Out[5]= {-4, 0}