login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

Numbers k such that the k-th composition in standard order is not an anti-run, i.e., has adjacent equal parts.
32

%I #8 Nov 04 2021 11:09:11

%S 3,7,10,11,14,15,19,21,23,26,27,28,29,30,31,35,36,39,42,43,46,47,51,

%T 53,55,56,57,58,59,60,61,62,63,67,71,73,74,75,78,79,83,84,85,86,87,90,

%U 91,92,93,94,95,99,100,103,106,107,110,111,112,113,114,115,116

%N Numbers k such that the k-th composition in standard order is not an anti-run, i.e., has adjacent equal parts.

%C First differs from A345168 in lacking 37, corresponding to the composition (3,2,1).

%C A composition of n is a finite sequence of positive integers summing to n. The k-th composition in standard order (row k of A066099) is obtained by taking the set of positions of 1's in the reversed binary expansion of k, prepending 0, taking first differences, and reversing again.

%e The terms and corresponding standard compositions begin:

%e 3: (1,1) 35: (4,1,1) 61: (1,1,1,2,1)

%e 7: (1,1,1) 36: (3,3) 62: (1,1,1,1,2)

%e 10: (2,2) 39: (3,1,1,1) 63: (1,1,1,1,1,1)

%e 11: (2,1,1) 42: (2,2,2) 67: (5,1,1)

%e 14: (1,1,2) 43: (2,2,1,1) 71: (4,1,1,1)

%e 15: (1,1,1,1) 46: (2,1,1,2) 73: (3,3,1)

%e 19: (3,1,1) 47: (2,1,1,1,1) 74: (3,2,2)

%e 21: (2,2,1) 51: (1,3,1,1) 75: (3,2,1,1)

%e 23: (2,1,1,1) 53: (1,2,2,1) 78: (3,1,1,2)

%e 26: (1,2,2) 55: (1,2,1,1,1) 79: (3,1,1,1,1)

%e 27: (1,2,1,1) 56: (1,1,4) 83: (2,3,1,1)

%e 28: (1,1,3) 57: (1,1,3,1) 84: (2,2,3)

%e 29: (1,1,2,1) 58: (1,1,2,2) 85: (2,2,2,1)

%e 30: (1,1,1,2) 59: (1,1,2,1,1) 86: (2,2,1,2)

%e 31: (1,1,1,1,1) 60: (1,1,1,3) 87: (2,2,1,1,1)

%t stc[n_]:=Differences[Prepend[Join@@Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;

%t Select[Range[100],MatchQ[stc[#],{___,x_,x_,___}]&]

%Y Constant run compositions are counted by A000005, ranked by A272919.

%Y Counting these compositions by sum and length gives A131044.

%Y These compositions are counted by A261983.

%Y The complement is A333489, counted by A003242.

%Y The non-alternating case is A345168, complement A345167.

%Y A011782 counts compositions, strict A032020.

%Y A238279 counts compositions by sum and number of maximal runs.

%Y A274174 counts compositions with equal parts contiguous.

%Y A336107 counts non-anti-run permutations of prime factors.

%Y A345195 counts non-alternating anti-runs, ranked by A345169.

%Y For compositions in standard order (rows of A066099):

%Y - Length is A000120.

%Y - Sum is A070939

%Y - Maximal runs are counted by A124767.

%Y - Strict compositions are ranked by A233564.

%Y - Maximal anti-runs are counted by A333381.

%Y - Runs-resistance is A333628.

%Y Cf. A029931, A048793, A106356, A114901, A167606, A178470, A228351, A244164, A262046, A335452, A335464.

%K nonn

%O 1,1

%A _Gus Wiseman_, Nov 03 2021