This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A375125 #6 Aug 03 2024 07:12:24 %S A375125 0,1,2,3,4,5,1,7,8,9,10,11,1,3,3,15,16,17,18,19,2,21,5,23,1,3,6,7,3,7, %T A375125 7,31,32,33,34,35,36,37,9,39,2,5,42,43,5,11,11,47,1,3,6,7,1,13,3,15,3, %U A375125 7,14,15,7,15,15,63,64,65,66,67,68,69,17,71,4,73 %N A375125 Strictly increasing run-leader transformation for standard compositions. %C A375125 The a(n)-th composition in standard order lists the leaders of strictly increasing runs in the n-th composition in standard order. %C A375125 The leaders of strictly increasing runs in a sequence are obtained by splitting it into maximal strictly increasing subsequences and taking the first term of each. %C A375125 The k-th composition in standard order (graded reverse-lexicographic, 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. This gives a bijective correspondence between nonnegative integers and integer compositions. %H A375125 Gus Wiseman, <a href="https://docs.google.com/document/d/e/2PACX-1vTCPiJVFUXN8IqfLlCXkgP15yrGWeRhFS4ozST5oA4Bl2PYS-XTA3sGsAEXvwW-B0ealpD8qnoxFqN3/pub">Statistics, classes, and transformations of standard compositions</a>. %H A375125 Gus Wiseman, <a href="/A374629/a374629.txt">Sequences counting and ranking compositions by their leaders (for six types of runs)</a>. %F A375125 A000120(a(n)) = A124768(n). %F A375125 A065120(a(n)) = A065120(n). %F A375125 A070939(a(n)) = A374684(n). %e A375125 The 813th composition in standard order is (1,3,2,1,2,1), with strictly increasing runs ((1,3),(2),(1,2),(1)), with leaders (1,2,1,1). This is the 27th composition in standard order, so a(813) = 27. %t A375125 stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse; %t A375125 stcinv[q_]:=Total[2^(Accumulate[Reverse[q]])]/2; %t A375125 Table[stcinv[First/@Split[stc[n],Less]],{n,0,100}] %Y A375125 Positions of elements of A233564 are A374698, counted by A374687. %Y A375125 Positions of elements of A272919 are A374685, counted by A374686. %Y A375125 Ranks of rows of A374683. %Y A375125 The weak version is A375123. %Y A375125 The weak opposite version is A375124. %Y A375125 The opposite version is A375126. %Y A375125 Other transformations: A375127, A373948. %Y A375125 A011782 counts compositions. %Y A375125 A238130, A238279, A333755 count compositions by number of runs. %Y A375125 All of the following pertain to compositions in standard order: %Y A375125 - Length is A000120. %Y A375125 - Sum is A029837(n+1) = A070939(n). %Y A375125 - Parts are listed by A066099. %Y A375125 - Number of adjacent equal pairs is A124762, unequal A333382. %Y A375125 - Run-length transform is A333627. %Y A375125 - Run-compression transform is A373948, sum A373953, excess A373954. %Y A375125 - Ranks of contiguous compositions are A374249, counted by A274174. %Y A375125 - Run-sum transformation is A353847. %Y A375125 Six types of runs: %Y A375125 - Count: A124766, A124765, A124768, A124769, A333381, A124767. %Y A375125 - Leaders: A374629, A374740, A374683, A374757, A374515, A374251. %Y A375125 - Rank: A375123, A375124, A375125, A375126, A375127, A373948. %Y A375125 Cf. A065120, A106356, A189076, A238343, A333213, A373949, A374634, A374635, A374684, A374700, A375128. %K A375125 nonn %O A375125 0,3 %A A375125 _Gus Wiseman_, Aug 02 2024