OFFSET
1,6
LINKS
Mathematics Stack Exchange, What is a sequence run? (answered 2011-12-01)
EXAMPLE
The a(36) = 2 permutations are (1,1,2,2), (2,2,1,1). Missing are: (1,2,1,2), (1,2,2,1), (2,1,1,2), (2,1,2,1). Here we use prime indices instead of factors.
MATHEMATICA
Table[Length[Select[Permutations[Join@@ ConstantArray@@@FactorInteger[n]], UnsameQ@@Split[#]&]], {n, 100}]
CROSSREFS
The maximum number of possible permutations is A008480.
A005811 counts runs in binary expansion.
A044813 lists numbers whose binary expansion has distinct run-lengths.
A283353 counts normal multisets with a permutation without distinct runs.
A297770 counts distinct runs in binary expansion.
Counting words with all distinct runs:
KEYWORD
nonn
AUTHOR
Gus Wiseman, Feb 13 2022
STATUS
approved