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.

Showing 1-10 of 11 results. Next

A384884 Number of integer partitions of n with all distinct lengths of maximal gapless runs (decreasing by 0 or 1).

Original entry on oeis.org

1, 1, 2, 3, 4, 6, 9, 13, 18, 25, 35, 46, 60, 79, 104, 131, 170, 215, 271, 342, 431, 535, 670, 830, 1019, 1258, 1547, 1881, 2298, 2787, 3359, 4061, 4890, 5849, 7010, 8361, 9942, 11825, 14021, 16558, 19561, 23057, 27084, 31821, 37312, 43627, 50999, 59500, 69267
Offset: 0

Views

Author

Gus Wiseman, Jun 13 2025

Keywords

Examples

			The partition y = (6,6,4,3,3,2) has maximal gapless runs ((6,6),(4,3,3,2)), with lengths (2,4), so y is counted under a(24).
The a(1) = 1 through a(8) = 18 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (21)   (22)    (32)     (33)      (43)       (44)
             (111)  (211)   (221)    (222)     (322)      (332)
                    (1111)  (311)    (321)     (331)      (422)
                            (2111)   (411)     (421)      (431)
                            (11111)  (2211)    (511)      (521)
                                     (3111)    (2221)     (611)
                                     (21111)   (3211)     (2222)
                                     (111111)  (4111)     (3221)
                                               (22111)    (4211)
                                               (31111)    (5111)
                                               (211111)   (22211)
                                               (1111111)  (32111)
                                                          (41111)
                                                          (221111)
                                                          (311111)
                                                          (2111111)
                                                          (11111111)
		

Crossrefs

For subsets instead of strict partitions we have A384175.
The strict case is A384178, for anti-runs A384880.
For anti-runs we have A384885.
For equal instead of distinct lengths we have A384887.
A000041 counts integer partitions, strict A000009.
A007690 counts partitions with no singletons, complement A183558.
A034296 counts flat or gapless partitions, ranks A066311 or A073491.
A098859 counts Wilf partitions (distinct multiplicities), complement A336866.
A239455 counts Look-and-Say or section-sum partitions, ranks A351294 or A381432.
A355394 counts partitions without a neighborless part, singleton case A355393.
A356236 counts partitions with a neighborless part, singleton case A356235.
A356606 counts strict partitions without a neighborless part, complement A356607.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@Length/@Split[#,#2>=#1-1&]&]],{n,0,15}]

A384880 Number of strict integer partitions of n with all distinct lengths of maximal anti-runs (decreasing by more than 1).

Original entry on oeis.org

1, 1, 1, 1, 2, 2, 3, 4, 6, 6, 9, 10, 12, 15, 18, 21, 25, 30, 34, 41, 46, 55, 63, 75, 85, 99, 114, 133, 152, 178, 201, 236, 269, 308, 352, 404, 460, 525, 594, 674, 763, 865, 974, 1098, 1236, 1385, 1558, 1745, 1952, 2181, 2435, 2712, 3026, 3363, 3740, 4151, 4612
Offset: 0

Views

Author

Gus Wiseman, Jun 13 2025

Keywords

Examples

			The strict partition y = (10,7,6,4,2,1) has maximal anti-runs ((10,7),(6,4,2),(1)), with lengths (2,3,1), so y is counted under a(30).
The a(1) = 1 through a(14) = 18 partitions (A-E = 10-14):
  1  2  3  4   5   6   7    8    9    A    B    C    D     E
           31  41  42  52   53   63   64   74   75   85    86
                   51  61   62   72   73   83   84   94    95
                       421  71   81   82   92   93   A3    A4
                            431  531  91   A1   A2   B2    B3
                            521  621  532  542  B1   C1    C2
                                      541  632  642  643   D1
                                      631  641  651  652   653
                                      721  731  732  742   743
                                           821  741  751   752
                                                831  832   761
                                                921  841   842
                                                     931   851
                                                     A21   932
                                                     6421  941
                                                           A31
                                                           B21
                                                           7421
		

Crossrefs

For subsets instead of strict partitions we have A384177.
For runs instead of anti-runs we have A384178.
This is the strict case of A384885.
A000041 counts integer partitions, strict A000009.
A047993 counts partitions with max part = length.
A098859 counts Wilf partitions (complement A336866), compositions A242882.
A239455 counts Look-and-Say or section-sum partitions, ranks A351294 or A381432.
A351293 counts non-Look-and-Say or non-section-sum partitions, ranks A351295 or A381433.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],UnsameQ@@#&&UnsameQ@@Length/@Split[#,#2<#1-1&]&]],{n,0,30}]

A384887 Number of integer partitions of n with all equal lengths of maximal gapless runs (decreasing by 0 or 1).

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 9, 10, 14, 18, 21, 26, 35, 39, 46, 58, 68, 79, 97, 111, 131, 155, 177, 206, 246, 278, 318, 373, 423, 483, 563, 632, 722, 827, 931, 1058, 1209, 1354, 1528, 1736, 1951, 2188, 2475, 2762, 3097, 3488, 3886, 4342, 4876, 5414, 6038, 6741, 7482
Offset: 0

Views

Author

Gus Wiseman, Jun 15 2025

Keywords

Examples

			The partition y = (6,5,5,5,3,3,2,1) has maximal gapless runs ((6,5,5,5),(3,3,2,1)), with lengths (4,4), so y is counted under a(30).
The a(1) = 1 through a(8) = 14 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (21)   (22)    (32)     (33)      (43)       (44)
             (111)  (31)    (41)     (42)      (52)       (53)
                    (211)   (221)    (51)      (61)       (62)
                    (1111)  (2111)   (222)     (322)      (71)
                            (11111)  (321)     (2221)     (332)
                                     (2211)    (3211)     (2222)
                                     (21111)   (22111)    (3221)
                                     (111111)  (211111)   (3311)
                                               (1111111)  (22211)
                                                          (32111)
                                                          (221111)
                                                          (2111111)
                                                          (11111111)
		

Crossrefs

The strict case is A384886, distinct A384178.
For distinct instead of equal lengths we have A384884.
For anti-runs instead of runs we have A384888, distinct A384885.
For subsets instead of strict partitions we have A243815.
Without counting decreases by 0 we get A384904.
A000041 counts integer partitions, strict A000009.
A007690 counts partitions with no singletons, complement A183558.
A034296 counts flat or gapless partitions, ranks A066311 or A073491.
A098859 counts Wilf partitions (distinct multiplicities), complement A336866.
A355394 counts partitions without a neighborless part, singleton case A355393.
A356236 counts partitions with a neighborless part, singleton case A356235.
A356606 counts strict partitions without a neighborless part, complement A356607.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],SameQ@@Length/@Split[#,#2>=#1-1&]&]],{n,0,15}]

A384891 Number of permutations of {1..n} with all distinct lengths of maximal runs (increasing by 1).

Original entry on oeis.org

1, 1, 1, 3, 3, 5, 23, 25, 43, 63, 345, 365, 665, 949, 1513, 8175, 9003, 15929, 23399, 36949, 51043, 293715, 314697, 570353, 826817, 1318201, 1810393, 2766099, 14180139, 15600413, 27707879, 40501321, 63981955, 88599903, 134362569, 181491125, 923029217
Offset: 0

Views

Author

Gus Wiseman, Jun 19 2025

Keywords

Examples

			The permutation (1,2,6,7,8,9,3,4,5) has maximal runs ((1,2),(6,7,8,9),(3,4,5)), with lengths (2,4,3), so is counted under a(9).
The a(0) = 1 through a(7) = 25 permutations:
  ()  (1)  (12)  (123)  (1234)  (12345)  (123456)  (1234567)
                 (231)  (2341)  (23451)  (123564)  (1234675)
                 (312)  (4123)  (34512)  (123645)  (1234756)
                                (45123)  (124563)  (1245673)
                                (51234)  (126345)  (1273456)
                                         (145623)  (1456723)
                                         (156234)  (1672345)
                                         (231456)  (2314567)
                                         (234156)  (2345167)
                                         (234561)  (2345671)
                                         (312456)  (3124567)
                                         (345126)  (3456127)
                                         (345612)  (3456712)
                                         (412356)  (4567123)
                                         (451236)  (4567231)
                                         (456231)  (4567312)
                                         (456312)  (5123467)
                                         (561234)  (5612347)
                                         (562341)  (5671234)
                                         (564123)  (6712345)
                                         (612345)  (6723451)
                                         (634512)  (6751234)
                                         (645123)  (7123456)
                                                   (7345612)
                                                   (7561234)
		

Crossrefs

Counting by number of maximal anti-runs gives A010027, for runs A123513.
For subsets instead of permutations we have A384175, complement A384176.
For partitions we have A384884 (anti-runs A384885), strict A384178 (anti-runs A384880).
For equal instead of distinct lengths we have A384892.
For anti-runs instead of runs we have A384907.
A000041 counts integer partitions, strict A000009.
A034839 counts subsets by number of maximal runs, for strict partitions A116674.
A098859 counts Wilf partitions (distinct multiplicities), complement A336866.
A356606 counts strict partitions without a neighborless part, complement A356607.
A384893 counts subsets by number of maximal anti-runs, for partitions A268193, A384905.

Programs

  • Mathematica
    Table[Length[Select[Permutations[Range[n]],UnsameQ@@Length/@Split[#,#2==#1+1&]&]],{n,0,10}]
  • PARI
    lista(n)=my(b(n)=sum(i=0,n-1,(-1)^i*(n-i)!*binomial(n-1,i)), d=floor(sqrt(2*n)), p=prod(i=1,n,1+x*y^i,1+O(y*y^n)*((1-x^(n+1))/(1-x))+O(x*x^d))); Vec(1+sum(i=1,d,i!*b(i)*polcoef(p,i))) \\ Christian Sievers, Jun 22 2025

Formula

a(n) = Sum_{k=1..n} ( T(n,k) * A000255(k-1) ) for n>=1, where T(n,k) is the number of compositions of n into k distinct parts (cf. A072574). - Christian Sievers, Jun 22 2025

Extensions

a(11) and beyond from Christian Sievers, Jun 22 2025

A384892 Number of permutations of {1..n} with all equal lengths of maximal runs (increasing by 1).

Original entry on oeis.org

1, 1, 2, 4, 13, 54, 314, 2120, 16700, 148333, 1468512, 16019532, 190899736, 2467007774, 34361896102, 513137616840, 8178130784179, 138547156531410, 2486151753462260, 47106033220679060, 939765362754015750, 19690321886243848784, 432292066866187743954
Offset: 0

Views

Author

Gus Wiseman, Jun 19 2025

Keywords

Examples

			The permutation (1,2,5,6,3,4,7,8) has maximal runs ((1,2),(5,6),(3,4),(7,8)), with lengths (2,2,2,2), so is counted under a(8).
The a(0) = 1 through a(4) = 13 permutations:
  ()  (1)  (12)  (123)  (1234)
           (21)  (132)  (1324)
                 (213)  (1432)
                 (321)  (2143)
                        (2413)
                        (2431)
                        (3142)
                        (3214)
                        (3241)
                        (3412)
                        (4132)
                        (4213)
                        (4321)
		

Crossrefs

For subsets instead of permutations we have A243815, for anti-runs A384889.
For strict partitions and distinct lengths we have A384178, anti-runs A384880.
For integer partitions and distinct lengths we have A384884, anti-runs A384885.
For distinct lengths we have A384891, for anti-runs A384907.
For partitions we have A384904, strict A384886.
A010027 counts permutations by maximal anti-runs, for runs A123513.
A034839 counts subsets by number of maximal runs, for strict partitions A116674.
A098859 counts Wilf partitions (distinct multiplicities), complement A336866.
A384893 counts subsets by number of maximal anti-runs, for partitions A268193, A384905.

Programs

  • Mathematica
    Table[Length[Select[Permutations[Range[n]],SameQ@@Length/@Split[#,#2==#1+1&]&]],{n,0,10}]
  • PARI
    a(n)=if(n,sumdiv(n,d,sum(i=0,d-1,(-1)^i*(d-i)!*binomial(d-1,i))),1) \\ Christian Sievers, Jun 22 2025

Formula

a(n) = Sum_{d|n} A000255(d-1). - Christian Sievers, Jun 22 2025

Extensions

a(11) and beyond from Christian Sievers, Jun 22 2025

A384888 Number of integer partitions of n with all equal lengths of maximal anti-runs (decreasing by more than 1).

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 9, 10, 13, 17, 20, 24, 32, 36, 44, 55, 64, 75, 92, 105, 125, 147, 169, 195, 231, 263, 303, 351, 401, 458, 532, 600, 686, 784, 889, 1010, 1152, 1296, 1468, 1662, 1875, 2108, 2384, 2669, 3001, 3373, 3775, 4222, 4734, 5278, 5896, 6576, 7322
Offset: 0

Views

Author

Gus Wiseman, Jun 15 2025

Keywords

Examples

			The partition y = (10,6,6,4,3,1) has maximal anti-runs ((10,6),(6,4),(3,1)), with lengths (2,2,2), so y is counted under a(30).
The a(1) = 1 through a(8) = 13 partitions:
  (1)  (2)   (3)    (4)     (5)      (6)       (7)        (8)
       (11)  (21)   (22)    (32)     (33)      (43)       (44)
             (111)  (31)    (41)     (42)      (52)       (53)
                    (211)   (221)    (51)      (61)       (62)
                    (1111)  (2111)   (222)     (322)      (71)
                            (11111)  (321)     (2221)     (332)
                                     (2211)    (3211)     (2222)
                                     (21111)   (22111)    (3221)
                                     (111111)  (211111)   (22211)
                                               (1111111)  (32111)
                                                          (221111)
                                                          (2111111)
                                                          (11111111)
		

Crossrefs

The strict case is new, distinct A384880.
For distinct instead of equal lengths we have A384885.
For runs instead of anti-runs we have A384887, distinct A384884.
For subsets instead of strict partitions we have A384889, distinct A384177, runs A243815.
A000041 counts integer partitions, strict A000009.
A007690 counts partitions with no singletons, complement A183558.
A034296 counts flat or gapless partitions, ranks A066311 or A073491.
A098859 counts Wilf partitions (distinct multiplicities), complement A336866.
A239455 counts Look-and-Say or section-sum partitions, ranks A351294 or A381432.
A355394 counts partitions without a neighborless part, singleton case A355393.
A356236 counts partitions with a neighborless part, singleton case A356235.
A356606 counts strict partitions without a neighborless part, complement A356607.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],SameQ@@Length/@Split[#,#2<#1-1&]&]],{n,0,15}]

A384907 Number of permutations of {1..n} with all distinct lengths of maximal anti-runs (not increasing by 1).

Original entry on oeis.org

1, 1, 1, 5, 17, 97, 587, 4291, 33109, 319967, 3106433, 35554459, 419889707, 5632467097, 77342295637, 1201240551077, 18804238105133, 328322081898745, 5832312989183807, 113154541564902427, 2229027473451951265, 47899977701182298255, 1037672943682453127645
Offset: 0

Views

Author

Gus Wiseman, Jun 21 2025

Keywords

Examples

			The permutation (1,2,4,3,5,7,8,6,9) has maximal anti-runs ((1),(2,4,3,5,7),(8,6,9)), with lengths (1,5,3), so is counted under a(9).
The a(0) = 1 through a(4) = 17 permutations:
  ()  (1)  (2,1)  (1,3,2)  (1,2,4,3)
                  (2,1,3)  (1,3,2,4)
                  (2,3,1)  (1,4,2,3)
                  (3,1,2)  (1,4,3,2)
                  (3,2,1)  (2,1,3,4)
                           (2,1,4,3)
                           (2,3,1,4)
                           (2,4,1,3)
                           (2,4,3,1)
                           (3,1,4,2)
                           (3,2,1,4)
                           (3,2,4,1)
                           (3,4,2,1)
                           (4,1,3,2)
                           (4,2,1,3)
                           (4,3,1,2)
                           (4,3,2,1)
		

Crossrefs

For subsets instead of permutations we have A384177.
For strict partitions we have A384880, for runs A384178.
For partitions we have A384885, for runs A384884.
For runs instead of anti-runs we have A384891.
A010027 counts permutations by maximal anti-runs, for runs A123513.
A034839 counts subsets by number of maximal runs, for strict partitions A116674.
A098859 counts Wilf partitions (distinct multiplicities), complement A336866.
A384893 counts subsets by number of maximal anti-runs, for partitions A268193, A384905.

Programs

  • Mathematica
    Table[Length[Select[Permutations[Range[n]],UnsameQ@@Length/@Split[#,#2!=#1+1&]&]],{n,0,10}]
  • PARI
    a(n)=if(n,my(b(n)=sum(i=0,n-1,(-1)^i*(n-i)!*binomial(n-1,i)), d=floor(sqrt(2*n)), p=polcoef(prod(i=1,n,1+x*y^i,1+O(y*y^n)*((1-x^(d+1))/(1-x))),n,y)); sum(i=1,d,b(n+1-i)*i!*polcoef(p,i)),1) \\ Christian Sievers, Jun 22 2025

Formula

a(n) = Sum_{k=1..n} ( T(n,k) * A000255(n-k) ) for n>=1, where T(n,k) is the number of compositions of n into k distinct parts (cf. A072574).

Extensions

a(11) and beyond from Christian Sievers, Jun 22 2025

A385574 Number of integer partitions of n with the same number of adjacent equal parts as adjacent unequal parts.

Original entry on oeis.org

1, 1, 1, 1, 2, 3, 2, 4, 5, 6, 10, 11, 13, 17, 20, 30, 36, 44, 55, 70, 86, 98, 128, 156, 190, 235, 288, 351, 409, 499, 603, 722, 863, 1025, 1227, 1461, 1757, 2061, 2444, 2892, 3406, 3996, 4708, 5497, 6430, 7595, 8835, 10294, 12027, 13971, 16252, 18887, 21878
Offset: 0

Views

Author

Gus Wiseman, Jul 04 2025

Keywords

Comments

These are also integer partitions of n with the same number of distinct parts as maximal anti-runs of parts.

Examples

			The partition (5,3,2,1,1,1,1) has 4 runs ((5),(3),(2),(1,1,1,1)) and 4 anti-runs ((5,3,2,1),(1),(1),(1)) so is counted under a(14).
The a(1) = 1 through a(10) = 10 reversed partitions (A = 10):
  (1)  (2)  (3)  (4)    (5)    (6)    (7)    (8)      (9)      (A)
                 (112)  (113)  (114)  (115)  (116)    (117)    (118)
                        (122)         (133)  (224)    (144)    (226)
                                      (223)  (233)    (225)    (244)
                                             (11123)  (11124)  (334)
                                                      (11223)  (11125)
                                                               (11134)
                                                               (11224)
                                                               (11233)
                                                               (12223)
		

Crossrefs

The RHS is counted by A116608, rank statistic A297155.
The LHS is counted by A133121, rank statistic A046660.
For related inequalities see A212165, A212168, A361204.
For subsets instead of partitions see A217615, A385572, A385575.
These partitions are ranked by A385576.
A000041 counts integer partitions, strict A000009.
A007690 counts partitions with no singletons, complement A183558.
A034296 counts flat or gapless partitions, ranks A066311 or A073491.
A034839 counts subsets by number maximal runs, for partitions A384881, strict A116674.
A047993 counts partitions with max part = length (A106529).
A098859 counts Wilf partitions (complement A336866), compositions A242882.
A268193 counts partitions by maximal anti-runs, strict A384905, subsets A384893.
A355394 counts partitions with neighbors, complement A356236.

Programs

  • Mathematica
    Table[Length[Select[Reverse/@IntegerPartitions[n],Length[Union[#]]==Length[Split[#,#2!=#1&]]&]],{n,0,30}]
  • PARI
    lista(n)=Vec(polcoef((prod(i=1,n,1+x^i/(t*(1-t*x^i))+O(x*x^n))-1)*t+1,0,t)) \\ Christian Sievers, Jul 18 2025

Formula

For a partition p, let s(p) be its sum, e(p) the number of equal adjacent pairs, and d(p) the number of distinct adjacent pairs. Then Sum_{p partition} x^s(p) * t^(e(p)-d(p)) = (Product_{i>=1} (1 + x^i/(t*(1-t*x^i))) - 1) * t + 1, so a(n) is the coefficient of x^n*t^0 of this expression. - Christian Sievers, Jul 18 2025

A385814 Triangle read by rows where T(n,k) is the number of integer partitions of n with k maximal proper anti-runs (sequences decreasing by more than 1).

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 2, 1, 1, 1, 0, 2, 2, 1, 1, 1, 0, 3, 2, 3, 1, 1, 1, 0, 3, 4, 2, 3, 1, 1, 1, 0, 4, 5, 4, 3, 3, 1, 1, 1, 0, 5, 5, 6, 5, 3, 3, 1, 1, 1, 0, 6, 8, 7, 6, 6, 3, 3, 1, 1, 1, 0, 7, 9, 10, 8, 7, 6, 3, 3, 1, 1, 1
Offset: 0

Views

Author

Gus Wiseman, Jul 09 2025

Keywords

Examples

			The partition (8,5,4,2,1) has maximal proper anti-runs ((8,5),(4,2),(1)) so is counted under T(20,3).
The partition (8,5,3,2,2) has maximal proper anti-runs ((8,5,3),(2),(2)) so is also counted under T(20,3).
Row n = 8 counts the following partitions:
  .  8   611  5111  41111  32111   221111  2111111  11111111
     71  521  4211  3221   311111
     62  44   332   2222   22211
     53  431  3311
         422
Triangle begins:
  1
  0  1
  0  1  1
  0  1  1  1
  0  2  1  1  1
  0  2  2  1  1  1
  0  3  2  3  1  1  1
  0  3  4  2  3  1  1  1
  0  4  5  4  3  3  1  1  1
  0  5  5  6  5  3  3  1  1  1
  0  6  8  7  6  6  3  3  1  1  1
  0  7  9 10  8  7  6  3  3  1  1  1
  0  9 11 13 12  9  8  6  3  3  1  1  1
  0 10 14 16 15 13 10  8  6  3  3  1  1  1
  0 12 19 18 21 17 14 11  8  6  3  3  1  1  1
  0 14 21 26 23 24 19 15 11  8  6  3  3  1  1  1
  0 17 26 31 33 28 26 20 16 11  8  6  3  3  1  1  1
  0 19 32 37 40 39 31 28 21 16 11  8  6  3  3  1  1  1
  0 23 38 47 50 47 45 34 29 22 16 11  8  6  3  3  1  1  1
  0 26 45 57 61 61 54 48 36 30 22 16 11  8  6  3  3  1  1  1
  0 31 53 71 75 76 70 60 51 37 31 22 16 11  8  6  3  3  1  1  1
		

Crossrefs

Row sums are A000041, strict A000009.
Column k = 1 is A003114.
For anti-runs instead of proper anti-runs we have A268193.
The corresponding rank statistic is A356228.
For proper runs instead of proper anti-runs we have A384881.
For subsets instead of partitions we have A384893, runs A034839.
The strict case is A384905.
For runs instead of proper anti-runs we have A385815.
A007690 counts partitions with no singletons (ranks A001694), complement A183558.
A034296 counts flat or gapless partitions, ranks A066311 or A073491.
A047993 counts partitions with max part = length, ranks A106529.
A098859 counts Wilf partitions, complement A336866 (ranks A325992).
A116608 counts partitions by distinct parts.
A116931 counts sparse partitions, ranks A319630.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],Length[Split[#,#1>#2+1&]]==k&]],{n,0,10},{k,0,n}]

A385815 Triangle read by rows where T(n,k) is the number of integer partitions of n with k maximal runs of consecutive elements decreasing by 0 or 1.

Original entry on oeis.org

1, 0, 1, 0, 2, 0, 0, 3, 0, 0, 0, 4, 1, 0, 0, 0, 5, 2, 0, 0, 0, 0, 7, 4, 0, 0, 0, 0, 0, 8, 7, 0, 0, 0, 0, 0, 0, 10, 12, 0, 0, 0, 0, 0, 0, 0, 13, 16, 1, 0, 0, 0, 0, 0, 0, 0, 15, 25, 2, 0, 0, 0, 0, 0, 0, 0, 0, 18, 34, 4, 0, 0, 0, 0, 0, 0, 0, 0
Offset: 0

Views

Author

Gus Wiseman, Jul 09 2025

Keywords

Examples

			The partition (8,5,4,2,1) has maximal runs ((8),(5,4),(2,1)) so is counted under T(20,3).
The partition (8,5,3,2,2) has maximal runs ((8),(5),(3,2,2)) so is also counted under T(20,3).
Row n = 9 counts the following partitions:
  (9)                  (6,3)            (5,3,1)
  (5,4)                (7,2)
  (3,3,3)              (8,1)
  (4,3,2)              (4,4,1)
  (3,2,2,2)            (5,2,2)
  (3,3,2,1)            (6,2,1)
  (2,2,2,2,1)          (7,1,1)
  (3,2,2,1,1)          (4,2,2,1)
  (2,2,2,1,1,1)        (4,3,1,1)
  (3,2,1,1,1,1)        (5,2,1,1)
  (2,2,1,1,1,1,1)      (6,1,1,1)
  (2,1,1,1,1,1,1,1)    (3,3,1,1,1)
  (1,1,1,1,1,1,1,1,1)  (4,2,1,1,1)
                       (5,1,1,1,1)
                       (4,1,1,1,1,1)
                       (3,1,1,1,1,1,1)
Triangle begins:
   1
   0   1
   0   2   0
   0   3   0   0
   0   4   1   0   0
   0   5   2   0   0   0
   0   7   4   0   0   0   0
   0   8   7   0   0   0   0   0
   0  10  12   0   0   0   0   0   0
   0  13  16   1   0   0   0   0   0   0
   0  15  25   2   0   0   0   0   0   0   0
   0  18  34   4   0   0   0   0   0   0   0   0
   0  23  46   8   0   0   0   0   0   0   0   0   0
   0  26  62  13   0   0   0   0   0   0   0   0   0   0
   0  31  82  22   0   0   0   0   0   0   0   0   0   0   0
		

Crossrefs

Row sums are A000041, strict A000009.
Column k = 1 is A034296 (flat or gapless partitions, ranks A066311 or A073491).
For subsets instead of partitions we have A034839, anti-runs A384893.
The strict case appears to be A116674.
For anti-runs instead of runs we have A268193.
The corresponding rank statistic is A287170.
For proper runs instead of runs we have A384881.
For proper anti-runs instead of runs we have A385814.
A007690 counts partitions with no singletons (ranks A001694), complement A183558.
A047993 counts partitions with max part = length, rank A106529.
A098859 counts Wilf partitions, complement A336866 (ranks A325992).
A116608 counts partitions by distinct parts.
A116931 counts sparse partitions, ranks A319630.

Programs

  • Mathematica
    Table[Length[Select[IntegerPartitions[n],Length[Split[#,#1<=#2+1&]]==k&]],{n,0,20},{k,0,n}]
Showing 1-10 of 11 results. Next