OFFSET
1,1
COMMENTS
A co-Lyndon word is a finite sequence that is lexicographically strictly greater than all of its cyclic rotations.
EXAMPLE
The sequence of terms together with their binary expansions begins:
2: (1,0)
3: (1,1)
6: (1,1,0)
12: (1,1,0,0)
14: (1,1,1,0)
24: (1,1,0,0,0)
28: (1,1,1,0,0)
30: (1,1,1,1,0)
48: (1,1,0,0,0,0)
52: (1,1,0,1,0,0)
56: (1,1,1,0,0,0)
58: (1,1,1,0,1,0)
60: (1,1,1,1,0,0)
62: (1,1,1,1,1,0)
96: (1,1,0,0,0,0,0)
104: (1,1,0,1,0,0,0)
112: (1,1,1,0,0,0,0)
114: (1,1,1,0,0,1,0)
116: (1,1,1,0,1,0,0)
120: (1,1,1,1,0,0,0)
MATHEMATICA
colynQ[q_]:=Array[Union[{RotateRight[q, #], q}]=={RotateRight[q, #], q}&, Length[q]-1, 1, And];
Select[Range[2, 100], colynQ[Rest[IntegerDigits[#, 2]]]&]
CROSSREFS
KEYWORD
nonn
AUTHOR
Gus Wiseman, Nov 16 2019
STATUS
approved