cp's OEIS Frontend

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.

Previous Showing 81-90 of 185 results. Next

A374686 Number of integer compositions of n whose leaders of strictly increasing runs are identical.

Original entry on oeis.org

1, 1, 2, 3, 6, 9, 17, 29, 51, 91, 162, 291, 523, 948, 1712, 3112, 5656, 10297, 18763, 34217, 62442, 114006, 208239, 380465, 695342, 1271046, 2323818, 4249113, 7770389, 14210991, 25991853, 47541734, 86962675, 159077005, 291001483, 532345978, 973871397
Offset: 0

Views

Author

Gus Wiseman, Jul 27 2024

Keywords

Comments

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.
Also the number of ways to choose a strict integer partition of each part of an integer composition of n (A304969) such that the minima are identical. For maxima instead of minima we have A374760. For all partitions (not just strict) we have A374704, for maxima A358905.

Examples

			The composition (2,3,2,2,3,4) has strictly increasing runs ((2,3),(2),(2,3,4)), with leaders (2,2,2), so is counted under a(16).
The a(0) = 1 through a(6) = 17 compositions:
  ()  (1)  (2)   (3)    (4)     (5)      (6)
           (11)  (12)   (13)    (14)     (15)
                 (111)  (22)    (23)     (24)
                        (112)   (113)    (33)
                        (121)   (131)    (114)
                        (1111)  (1112)   (123)
                                (1121)   (141)
                                (1211)   (222)
                                (11111)  (1113)
                                         (1131)
                                         (1212)
                                         (1311)
                                         (11112)
                                         (11121)
                                         (11211)
                                         (12111)
                                         (111111)
		

Crossrefs

Ranked by A374685.
Types of runs (instead of strictly increasing):
- For leaders of identical runs we have A000005 for n > 0, ranks A272919.
- For leaders of anti-runs we have A374517, ranks A374519.
- For leaders of weakly increasing runs we have A374631, ranks A374633.
- For leaders of weakly decreasing runs we have A374742, ranks A374744.
- For leaders of strictly decreasing runs we have A374760, ranks A374759.
Types of run-leaders (instead of identical):
- For distinct leaders we have A374687, ranks A374698.
- For strictly increasing leaders we have A374688.
- For strictly decreasing leaders we have A374689.
- For weakly increasing leaders we have A374690.
- For weakly decreasing leaders we have A374697.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A335456 counts patterns matched by compositions.
A335548 counts non-contiguous compositions, ranks A374253.
A373949 counts compositions by run-compressed sum, opposite A373951.
A374683 lists leaders of strictly increasing runs of standard compositions.
A374700 counts compositions by sum of leaders of strictly increasing runs.

Programs

  • Mathematica
    Table[Length[Select[Join @@ Permutations/@IntegerPartitions[n],SameQ@@First/@Split[#,Less]&]],{n,0,15}]
  • PARI
    seq(n) = Vec(1 + sum(k=1, n, 1/(1 - x^k*prod(j=k+1, n-k, 1 + x^j, 1 + O(x^(n-k+1))))-1)) \\ Andrew Howroyd, Jul 27 2024

Extensions

a(26) onwards from Andrew Howroyd, Jul 27 2024

A374743 Number of integer compositions of n whose leaders of weakly decreasing runs are distinct.

Original entry on oeis.org

1, 1, 2, 4, 8, 15, 29, 55, 105, 198, 371, 690, 1280, 2364, 4353, 7981, 14568, 26466, 47876, 86264, 154896, 277236, 494675, 879924, 1560275, 2757830, 4859010, 8534420, 14945107, 26096824, 45446624, 78939432, 136773519, 236401194, 407614349, 701147189, 1203194421
Offset: 0

Views

Author

Gus Wiseman, Jul 25 2024

Keywords

Comments

The weakly decreasing run-leaders of a sequence are obtained by splitting it into maximal weakly decreasing subsequences and taking the first term of each.

Examples

			The composition (1,3,1,4,1,2,2,1) has maximal weakly decreasing subsequences ((1),(3,1),(4,1),(2,2,1)), with leaders (1,3,4,2), so is counted under a(15).
The a(0) = 1 through a(5) = 15 compositions:
  ()  (1)  (2)   (3)    (4)     (5)
           (11)  (12)   (13)    (14)
                 (21)   (22)    (23)
                 (111)  (31)    (32)
                        (112)   (41)
                        (121)   (113)
                        (211)   (122)
                        (1111)  (131)
                                (221)
                                (311)
                                (1112)
                                (1121)
                                (1211)
                                (2111)
                                (11111)
		

Crossrefs

Ranked by A374701 = positions of distinct rows in A374740, opposite A374629.
Types of runs (instead of weakly decreasing):
- For leaders of identical runs we have A274174, ranks A374249.
- For leaders of anti-runs we have A374518, ranks A374638.
- For leaders of weakly increasing runs we have A374632, ranks A374768.
- For leaders of strictly increasing runs we have A374687, ranks A374698.
- For leaders of strictly decreasing runs we have A374761, ranks A374767.
Types of run-leaders (instead of distinct):
- For weakly increasing leaders we appear to have A188900.
- For identical leaders we have A374742.
- For strictly increasing leaders we have opposite A374634.
- For strictly decreasing leaders we have A374746.
- For weakly decreasing leaders we have A374747.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335456 counts patterns matched by compositions.
A373949 counts compositions by run-compressed sum, opposite A373951.
A374748 counts compositions by sum of leaders of weakly decreasing runs.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],UnsameQ@@First/@Split[#,GreaterEqual]&]],{n,0,15}]

Extensions

a(24)-a(36) from Alois P. Heinz, Jul 26 2024

A374633 Numbers k such that the leaders of weakly increasing runs in the k-th composition in standard order (A066099) are identical.

Original entry on oeis.org

0, 1, 2, 3, 4, 6, 7, 8, 10, 12, 13, 14, 15, 16, 20, 24, 25, 26, 27, 28, 29, 30, 31, 32, 36, 40, 42, 48, 49, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 72, 80, 82, 84, 96, 97, 99, 100, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 115
Offset: 1

Views

Author

Gus Wiseman, Jul 21 2024

Keywords

Comments

The leaders of weakly increasing runs in a sequence are obtained by splitting it into maximal weakly increasing subsequences and taking the first term of each.
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.

Examples

			The maximal weakly increasing subsequences of the 26165th composition in standard order are ((1,3),(1,4),(1,2,2),(1)), with leaders (1,1,1,1), so 26165 is in the sequence.
The sequence together with the corresponding compositions begins:
   0: ()
   1: (1)
   2: (2)
   3: (1,1)
   4: (3)
   6: (1,2)
   7: (1,1,1)
   8: (4)
  10: (2,2)
  12: (1,3)
  13: (1,2,1)
  14: (1,1,2)
  15: (1,1,1,1)
  16: (5)
  20: (2,3)
  24: (1,4)
  25: (1,3,1)
  26: (1,2,2)
  27: (1,2,1,1)
		

Crossrefs

For strictly decreasing leaders we appear to have A188920.
For weakly decreasing leaders we appear to have A189076.
Other types of runs: A272919 (counted by A000005), A374519 (counted by A374517), A374685 (counted by A374686), A374744 (counted by A374742), A374759 (counted by A374760).
Positions of constant rows in A374629 (which has sums A374630).
Compositions of this type are counted by A374631.
For strictly increasing leaders see A374634.
For all different leaders we have A374768, counted by A374632.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A374637 counts compositions by sum of leaders of weakly increasing runs.
All of the following pertain to compositions in standard order:
- Ones are counted by A000120.
- Sum is A029837 (or sometimes A070939).
- Parts are listed by A066099.
- Length is A070939.
- Adjacent equal pairs are counted by A124762, unequal A333382.
- Number of max runs: A124765, A124766, A124767, A124768, A124769, A333381.
- Ranks of anti-run compositions are A333489, counted by A003242.
- Run-length transform is A333627.
- Run-compression transform is A373948, sum A373953, excess A373954.
- Ranks of contiguous compositions are A374249, counted by A274174.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],SameQ@@First/@Split[stc[#],LessEqual]&]

A374637 Triangle read by rows where T(n,k) is the number of integer compositions of n whose leaders of weakly increasing runs sum to k.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 2, 0, 2, 0, 3, 2, 1, 2, 0, 5, 4, 3, 1, 3, 0, 7, 10, 7, 3, 1, 4, 0, 11, 19, 14, 9, 4, 2, 5, 0, 15, 39, 27, 22, 10, 7, 2, 6, 0, 22, 69, 59, 48, 24, 15, 8, 3, 8, 0, 30, 125, 117, 104, 56, 38, 19, 10, 3, 10, 0, 42, 211, 241, 215, 132, 80, 49, 25, 12, 5, 12
Offset: 0

Views

Author

Gus Wiseman, Jul 23 2024

Keywords

Comments

The leaders of weakly increasing runs in a sequence are obtained by splitting it into maximal weakly increasing subsequences and taking the first term of each.

Examples

			Triangle begins:
   1
   0   1
   0   1   1
   0   2   0   2
   0   3   2   1   2
   0   5   4   3   1   3
   0   7  10   7   3   1   4
   0  11  19  14   9   4   2   5
   0  15  39  27  22  10   7   2   6
   0  22  69  59  48  24  15   8   3   8
   0  30 125 117 104  56  38  19  10   3  10
   0  42 211 241 215 132  80  49  25  12   5  12
   0  56 354 473 445 296 186 109  61  31  17   5  15
   0  77 571 917 896 665 409 258 139  78  41  20   7  18
Row n = 6 counts the following compositions:
  .  (15)      (24)     (33)     (312)   (411)  (6)
     (114)     (141)    (231)    (3111)         (51)
     (123)     (1311)   (213)    (2121)         (42)
     (1113)    (1131)   (132)                   (321)
     (1122)    (222)    (2211)
     (11112)   (1221)   (2112)
     (111111)  (1212)   (21111)
               (12111)
               (11211)
               (11121)
		

Crossrefs

Last column n = k is A000009.
Second column k = 2 is A000041.
Row-sums are A011782.
For length instead of sum we have A238343.
The corresponding rank statistic is A374630, row-sums of A374629.
Types of runs (instead of weakly increasing):
- For leaders of constant runs we have A373949.
- For leaders of anti-runs we have A374521.
- For leaders of strictly increasing runs we have A374700.
- For leaders of weakly decreasing runs we have A374748.
- For leaders of strictly decreasing runs we have A374766.
Types of run-leaders:
- For strictly decreasing leaders we appear to have A188920.
- For weakly decreasing leaders we appear to have A189076.
- For identical leaders we have A374631.
- For distinct leaders we have A374632, ranks A374768.
- For strictly increasing leaders we have A374634.
- For weakly increasing leaders we have A374635.
A003242 counts anti-run compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A335456 counts patterns matched by compositions.
A335548 counts non-contiguous compositions, ranks A374253.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations /@ IntegerPartitions[n],Total[First/@Split[#,LessEqual]]==k&]],{n,0,15},{k,0,n}]

A374701 Numbers k such that the leaders of weakly decreasing runs in the k-th composition in standard order (A066099) are distinct.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 47, 48, 49, 50, 51, 52, 53, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71
Offset: 1

Views

Author

Gus Wiseman, Jul 24 2024

Keywords

Comments

First differs from A335469 in having 150, which corresponds to the composition (3,2,1,2).
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.

Examples

			The maximal weakly decreasing subsequences of the 1257th composition in standard order are ((3,1,1),(2),(3,1)), with leaders (3,2,3), so 1257 is not in the sequence.
		

Crossrefs

Positions of distinct (strict) rows in A374740, opposite A374629.
Compositions of this type are counted by A374743.
For identical leaders we have A374744, counted by A374742.
Other types of runs and their counts: A374249 (A274174), A374638 (A374518), A374698 (A374687), A374767 (A374761), A374768 (A374632).
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A335456 counts patterns matched by compositions.
A373949 counts compositions by run-compressed sum.
All of the following pertain to compositions in standard order:
- Length is A000120.
- Sum is A029837(n+1) (or sometimes A070939).
- Parts are listed by A066099.
- Adjacent equal pairs are counted by A124762, unequal A333382.
- Number of max runs: A124765, A124766, A124767, A124768, A124769, A333381.
- Ranks of anti-run compositions are A333489, counted by A003242.
- Run-length transform is A333627.
- Run-compression transform is A373948, sum A373953, excess A373954.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],UnsameQ@@First/@Split[stc[#],GreaterEqual]&] (* Gus Wiseman, Jul 24 2024 *)

A374760 Number of integer compositions of n whose leaders of strictly decreasing runs are identical.

Original entry on oeis.org

1, 1, 2, 3, 4, 6, 8, 11, 15, 21, 28, 38, 52, 70, 95, 129, 173, 234, 318, 428, 579, 784, 1059, 1433, 1942, 2630, 3564, 4835, 6559, 8902, 12094, 16432, 22340, 30392, 41356, 56304, 76692, 104499, 142448, 194264, 265015, 361664, 493749, 674278, 921113, 1258717
Offset: 0

Views

Author

Gus Wiseman, Jul 29 2024

Keywords

Comments

The leaders of strictly decreasing runs in a sequence are obtained by splitting it into maximal strictly decreasing subsequences and taking the first term of each.

Examples

			The composition (3,3,2,1,3,2,1) has strictly decreasing runs ((3),(3,2,1),(3,2,1)), with leaders (3,3,3), so is counted under a(15).
The a(0) = 1 through a(8) = 15 compositions:
  ()  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
           (11)  (21)   (22)    (32)     (33)      (43)       (44)
                 (111)  (31)    (41)     (42)      (52)       (53)
                        (1111)  (212)    (51)      (61)       (62)
                                (221)    (222)     (313)      (71)
                                (11111)  (321)     (331)      (323)
                                         (2121)    (421)      (332)
                                         (111111)  (2122)     (431)
                                                   (2212)     (521)
                                                   (2221)     (2222)
                                                   (1111111)  (3131)
                                                              (21212)
                                                              (21221)
                                                              (22121)
                                                              (11111111)
		

Crossrefs

For partitions instead of compositions we have A034296.
The weak version is A374742, ranks A374744.
The opposite version is A374686, ranks A374685.
The weak opposite version is A374631, ranks A374633.
Ranked by A374759.
Other types of runs (instead of strictly decreasing):
- For leaders of identical runs we have A000005 for n > 0, ranks A272919.
- For leaders of anti-runs we have A374517, ranks A374519.
Other types of run-leaders (instead of identical):
- For distinct leaders we have A374761, ranks A374767.
- For strictly increasing leaders we have A374762.
- For strictly decreasing leaders we have A374763.
- For weakly increasing leaders we have A374764.
- For weakly decreasing leaders we have A374765.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A238130, A238279, A333755 count compositions by number of runs.
A274174 counts contiguous compositions, ranks A374249.
A373949 counts compositions by run-compressed sum, opposite A373951.

Programs

  • Mathematica
    Table[Length[Select[Join @@ Permutations/@IntegerPartitions[n],SameQ@@First/@Split[#,Greater]&]],{n,0,15}]
  • PARI
    seq(n) = Vec(1 + sum(k=1, n, 1/(1 - x^k*prod(j=1, min(n-k,k-1), 1 + x^j, 1 + O(x^(n-k+1))))-1)) \\ Andrew Howroyd, Jul 31 2024

Formula

G.f.: 1 + Sum_{k>=1} -1 + 1/(1 - x^k*Product_{j=1..k-1} (1 + x^j)). - Andrew Howroyd, Jul 31 2024

Extensions

a(24) onwards from Andrew Howroyd, Jul 31 2024

A335514 Number of (1,2,3)-matching compositions of n.

Original entry on oeis.org

0, 0, 0, 0, 0, 0, 1, 4, 14, 42, 114, 292, 714, 1686, 3871, 8696, 19178, 41667, 89386, 189739, 399144, 833290, 1728374, 3565148, 7319212, 14965880, 30496302, 61961380, 125577752, 253971555, 512716564, 1033496947, 2080572090, 4183940550, 8406047907, 16875834728
Offset: 0

Views

Author

Gus Wiseman, Jun 22 2020

Keywords

Examples

			The a(6) = 1 through a(8) = 14 compositions:
  (1,2,3)  (1,2,4)    (1,2,5)
           (1,1,2,3)  (1,3,4)
           (1,2,1,3)  (1,1,2,4)
           (1,2,3,1)  (1,2,1,4)
                      (1,2,2,3)
                      (1,2,3,2)
                      (1,2,4,1)
                      (2,1,2,3)
                      (1,1,1,2,3)
                      (1,1,2,1,3)
                      (1,1,2,3,1)
                      (1,2,1,1,3)
                      (1,2,1,3,1)
                      (1,2,3,1,1)
		

Crossrefs

The version for permutations is A056986.
The avoiding version is A102726.
These compositions are ranked by A335479.
The version for patterns is A335515.
The version for prime indices is A335520.
Permutations are counted by A000142 and ranked by A333218.
Patterns are counted by A000670 and ranked by A333217.
Patterns matched by compositions are counted by A335456.

Programs

  • Mathematica
    Table[Length[Select[Join@@Permutations/@IntegerPartitions[n],MatchQ[#,{_,x_,_,y_,_,z_,_}/;x
    				

Formula

a(n > 0) = 2^(n - 1) - A102726(n).

Extensions

Terms a(21) and beyond from Andrew Howroyd, Dec 31 2020

A374253 Numbers k such that the k-th composition in standard order matches the patterns (1,2,1) or (2,1,2).

Original entry on oeis.org

13, 22, 25, 27, 29, 45, 46, 49, 51, 53, 54, 55, 57, 59, 61, 76, 77, 82, 86, 89, 90, 91, 93, 94, 97, 99, 101, 102, 103, 105, 107, 108, 109, 110, 111, 113, 115, 117, 118, 119, 121, 123, 125, 141, 148, 150, 153, 155, 156, 157, 162, 165, 166, 173, 174, 177, 178
Offset: 1

Views

Author

Gus Wiseman, Jul 13 2024

Keywords

Comments

Such a composition cannot be strict.
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.

Examples

			The terms together with their standard compositions begin:
  13: (1,2,1)
  22: (2,1,2)
  25: (1,3,1)
  27: (1,2,1,1)
  29: (1,1,2,1)
  45: (2,1,2,1)
  46: (2,1,1,2)
  49: (1,4,1)
  51: (1,3,1,1)
  53: (1,2,2,1)
  54: (1,2,1,2)
  55: (1,2,1,1,1)
  57: (1,1,3,1)
  59: (1,1,2,1,1)
  61: (1,1,1,2,1)
  76: (3,1,3)
  77: (3,1,2,1)
  82: (2,3,2)
  86: (2,2,1,2)
  89: (2,1,3,1)
		

Crossrefs

Permutations of prime indices of this type are counted by A335460.
Compositions of this type are counted by A335548.
The complement is A374249, counted by A274174.
The anti-run case is A374254.
A003242 counts anti-run compositions, ranks A333489.
A011782 counts compositions.
A025047 counts wiggly compositions, ranks A345167.
A066099 lists compositions in standard order.
A124767 counts runs in standard compositions, anti-runs A333381.
A233564 ranks strict compositions, counted by A032020.
A333755 counts compositions by number of runs.
A335454 counts patterns matched by standard compositions.
A335456 counts patterns matched by compositions.
A335462 counts (1,2,1)- and (2,1,2)-matching permutations of prime indices.
A335465 counts minimal patterns avoided by a standard composition.
- A335470 counts (1,2,1)-matching compositions, ranks A335466.
- A335471 counts (1,2,1)-avoiding compositions, ranks A335467.
- A335472 counts (2,1,2)-matching compositions, ranks A335468.
- A335473 counts (2,1,2)-avoiding compositions, ranks A335469.
A373948 encodes run-compression using compositions in standard order.
A373949 counts compositions by run-compressed sum, opposite A373951.
A373953 gives run-compressed sum of standard compositions, excess A373954.

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],!UnsameQ@@First/@Split[stc[#]]&]

Formula

Equals A335466 \/ A335468.

A374759 Numbers k such that the leaders of strictly decreasing runs in the k-th composition in standard order are identical.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 7, 8, 9, 10, 15, 16, 17, 18, 21, 22, 31, 32, 33, 34, 36, 37, 42, 45, 63, 64, 65, 66, 68, 69, 73, 76, 85, 86, 90, 127, 128, 129, 130, 132, 133, 136, 137, 146, 148, 153, 170, 173, 181, 182
Offset: 1

Views

Author

Gus Wiseman, Jul 29 2024

Keywords

Comments

The leaders of strictly decreasing runs in a sequence are obtained by splitting it into maximal strictly decreasing subsequences and taking the first term of each.

Examples

			The 18789th composition in standard order is (3,3,2,1,3,2,1), with strictly decreasing runs ((3),(3,2,1),(3,2,1)), with leaders (3,3,3), so 18789 is in the sequence.
The terms together with the corresponding compositions begin:
   0: ()
   1: (1)
   2: (2)
   3: (1,1)
   4: (3)
   5: (2,1)
   7: (1,1,1)
   8: (4)
   9: (3,1)
  10: (2,2)
  15: (1,1,1,1)
  16: (5)
  17: (4,1)
  18: (3,2)
  21: (2,2,1)
  22: (2,1,2)
  31: (1,1,1,1,1)
  32: (6)
  33: (5,1)
  34: (4,2)
  36: (3,3)
  37: (3,2,1)
		

Crossrefs

For leaders of anti-runs we have A374519 (counted by A374517).
For leaders of weakly increasing runs we have A374633, counted by A374631.
The opposite version is A374685 (counted by A374686).
The weak version is A374744.
Compositions of this type are counted by A374760.
For distinct instead of identical runs we have A374767 (counted by A374761).
All of the following pertain to compositions in standard order:
- Length is A000120.
- Sum is A029837(n+1).
- Parts are listed by A066099.
- Number of adjacent equal pairs is A124762, unequal A333382.
- Run-length transform is A333627, sum A070939.
- Run-compression transform is A373948, sum A373953, excess A373954.
- Ranks of contiguous compositions are A374249, counted by A274174.
- Ranks of non-contiguous compositions are A374253, counted by A335548.
Six types of runs:

Programs

  • Mathematica
    stc[n_]:=Differences[Prepend[Join @@ Position[Reverse[IntegerDigits[n,2]],1],0]]//Reverse;
    Select[Range[0,100],SameQ@@First/@Split[stc[#],Greater]&]

A080599 Expansion of e.g.f.: 2/(2-2*x-x^2).

Original entry on oeis.org

1, 1, 3, 12, 66, 450, 3690, 35280, 385560, 4740120, 64751400, 972972000, 15949256400, 283232149200, 5416632421200, 110988861984000, 2425817682288000, 56333385828720000, 1385151050307024000, 35950878932544576000, 982196278209226080000, 28175806418228108640000
Offset: 0

Views

Author

Detlef Pauly (dettodet(AT)yahoo.de), Feb 24 2003

Keywords

Comments

Number of ordered partitions of {1,..,n} with at most 2 elements per block. - Bob Proctor, Apr 18 2005
In other words, number of preferential arrangements of n things (see A000670) in which each clump has size 1 or 2. - N. J. A. Sloane, Apr 13 2014
Recurrences (of the hypergeometric type of the Jovovic formula) mean: multiplying the sequence vector from the left with the associated matrix of the recurrence coefficients (here: an infinite lower triangular matrix with the natural numbers in the main diagonal and the triangular series in the subdiagonal) recovers the sequence up to an index shift. In that sense, this sequence here and many other sequences of the OEIS are eigensequences. - Gary W. Adamson, Feb 14 2011
Number of intervals in the weak (Bruhat) order of S_n that are Boolean algebras. - Richard Stanley, May 09 2011
a(n) = D^n(1/(1-x)) evaluated at x = 0, where D is the operator sqrt(1+2*x)*d/dx. Cf. A000085, A005442 and A052585. - Peter Bala, Dec 07 2011
From Gus Wiseman, Jul 04 2020: (Start)
Also the number of (1,1,1)-avoiding or cubefree sequences of length n covering an initial interval of positive integers. For example, the a(0) = 1 through a(3) = 12 sequences are:
() (1) (11) (112)
(12) (121)
(21) (122)
(123)
(132)
(211)
(212)
(213)
(221)
(231)
(312)
(321)
(End)

Examples

			From _Gus Wiseman_, Jul 04 2020: (Start)
The a(0) = 1 through a(3) = 12 ordered set partitions with block sizes <= 2 are:
  {}  {{1}}  {{1,2}}    {{1},{2,3}}
             {{1},{2}}  {{1,2},{3}}
             {{2},{1}}  {{1,3},{2}}
                        {{2},{1,3}}
                        {{2,3},{1}}
                        {{3},{1,2}}
                        {{1},{2},{3}}
                        {{1},{3},{2}}
                        {{2},{1},{3}}
                        {{2},{3},{1}}
                        {{3},{1},{2}}
                        {{3},{2},{1}}
(End)
		

Crossrefs

Column k=2 of A276921.
Cubefree numbers are A004709.
(1,1)-avoiding patterns are A000142.
(1,1,1)-avoiding compositions are A232432.
(1,1,1)-matching patterns are A335508.
(1,1,1)-avoiding permutations of prime indices are A335511.
(1,1,1)-avoiding compositions are ranked by A335513.
(1,1,1,1)-avoiding patterns are A189886.

Programs

  • Magma
    [n le 2 select 1 else (n-1)*Self(n-1) + Binomial(n-1,2)*Self(n-2): n in [1..31]]; // G. C. Greubel, Jan 31 2023
    
  • Maple
    a:= n-> n! *(Matrix([[1,1], [1/2,0]])^n)[1,1]:
    seq(a(n), n=0..40);  # Alois P. Heinz, Jun 01 2009
    a:= gfun:-rectoproc({a(n) = n*a(n-1)+(n*(n-1)/2)*a(n-2),a(0)=1,a(1)=1},a(n),remember):
    seq(a(n), n=0..40); # Robert Israel, Nov 01 2015
  • Mathematica
    Table[n!*SeriesCoefficient[-2/(-2+2*x+x^2),{x,0,n}],{n,0,20}] (* Vaclav Kotesovec, Oct 13 2012 *)
    Round@Table[n! ((1+Sqrt[3])^(n+1) - (1-Sqrt[3])^(n+1))/(2^(n+1) Sqrt[3]), {n, 0, 20}] (* Vladimir Reshetnikov, Oct 31 2015 *)
  • PARI
    Vec(serlaplace((2/(2-2*x-x^2) + O(x^30)))) \\ Michel Marcus, Nov 02 2015
    
  • SageMath
    A002605=BinaryRecurrenceSequence(2,2,0,1)
    def A080599(n): return factorial(n)*A002605(n+1)/2^n
    [A080599(n) for n in range(41)] # G. C. Greubel, Jan 31 2023

Formula

a(n) = n*a(n-1) + (n*(n-1)/2)*a(n-2). - Vladeta Jovovic, Aug 22 2003
E.g.f.: 1/(1-x-x^2/2). - Richard Stanley, May 09 2011
a(n) ~ n!*((1+sqrt(3))/2)^(n+1)/sqrt(3). - Vaclav Kotesovec, Oct 13 2012
a(n) = n!*((1+sqrt(3))^(n+1) - (1-sqrt(3))^(n+1))/(2^(n+1)*sqrt(3)). - Vladimir Reshetnikov, Oct 31 2015
a(n) = A090932(n) * A002530(n+1). - Robert Israel, Nov 01 2015
Previous Showing 81-90 of 185 results. Next