Lightly Documented Features: Difference between revisions

From Knot Atlas
Jump to navigationJump to search
(MorseLink stuff doc'ed elsewhere)
No edit summary
 
(4 intermediate revisions by 2 users not shown)
Line 6: Line 6:
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
{{HelpLine|
n = 1 |
n = 2 |
in = <nowiki>NumberOfKnots</nowiki> |
in = <nowiki>NumberOfKnots</nowiki> |
out= <nowiki>NumberOfKnots[type] return the number of knots of a given type.</nowiki>}}
out= <nowiki>NumberOfKnots[n] returns the number of knots with n crossings.
NumberOfKnots[n, Alternating&#124;NonAlternating] returns the number of knots of the specified type.</nowiki>}}
<!--END-->
<!--END-->


Line 14: Line 15:
<!--Robot Land, no human edits to "END"-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
{{InOut|
n = 2 |
n = 3 |
in = <nowiki>NumberOfKnots[16, NonAlternating]</nowiki> |
in = <nowiki>NumberOfKnots[16, NonAlternating]</nowiki> |
out= <nowiki>1008906</nowiki>}}
out= <nowiki>1008906</nowiki>}}
<!--END-->

<!--$$?AlternatingQ$$-->
<!--Robot Land, no human edits to "END"-->
{{HelpLine|
n = 4 |
in = <nowiki>AlternatingQ</nowiki> |
out= <nowiki>AlternatingQ[D] returns True iff the knot/link diagram D is alternating.</nowiki>}}
<!--END-->

Among the knots with up to 11 crossings, 564 are alternating and 238 are not:

<!--$$Total[AlternatingQ /@ AllKnots[{0,11}]]$$-->
<!--Robot Land, no human edits to "END"-->
{{InOut|
n = 5 |
in = <nowiki>Total[AlternatingQ /@ AllKnots[{0,11}]]</nowiki> |
out= <nowiki>238 False + 564 True</nowiki>}}
<!--END-->
<!--END-->

Latest revision as of 18:24, 21 February 2013


(For In[1] see Setup)

In[2]:= ?NumberOfKnots
NumberOfKnots[n] returns the number of knots with n crossings. NumberOfKnots[n, Alternating|NonAlternating] returns the number of knots of the specified type.
In[3]:= NumberOfKnots[16, NonAlternating]
Out[3]= 1008906
In[4]:= ?AlternatingQ
AlternatingQ[D] returns True iff the knot/link diagram D is alternating.

Among the knots with up to 11 crossings, 564 are alternating and 238 are not:

In[5]:= Total[AlternatingQ /@ AllKnots[{0,11}]]
Out[5]= 238 False + 564 True