A264034 -id:A264034 - cp's OEIS frontend

A363527 Number of integer partitions of n with weighted sum 3*n.

1, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 1, 1, 1, 3, 4, 4, 6, 8, 7, 10, 13, 13, 21, 25, 24, 37, 39, 40, 58, 63, 72, 94, 106, 118, 144, 165, 181, 224, 256, 277, 341, 387, 417, 504, 560, 615, 743, 818, 899, 1066, 1171, 1285, 1502, 1655, 1819, 2108, 2315, 2547, 2915

Offset: 0

Gus Wiseman, Jun 11 2023

nonn

Are the partitions counted all of length > 4?

The (one-based) weighted sum of a sequence (y_1,...,y_k) is Sum_{i=1..k} i*y_i. The reverse-weighted sum is the weighted sum of the reverse, also the sum of partial sums. For example, the weighted sum of (4,2,2,1) is 1*4 + 2*2 + 3*2 + 4*1 = 18 and the reverse-weighted sum is 4*4 + 3*2 + 2*2 + 1*1 = 27.

			The partition (2,2,1,1,1,1) has sum 8 and weighted sum 24 so is counted under a(8).
The a(13) = 1 through a(18) = 8 partitions:
  (332221)  (333221)    (33333)     (442222)    (443222)    (443331)
            (4322111)   (522222)    (5322211)   (4433111)   (444222)
            (71111111)  (4332111)   (55111111)  (5332211)   (533322)
                        (63111111)  (63211111)  (55211111)  (4443111)
                                                (63311111)  (7222221)
                                                (72221111)  (55311111)
                                                            (64221111)
                                                            (A11111111)

The version for compositions is A231429.
The reverse version is A363526.
These partitions have ranks A363531.
A000041 counts integer partitions, strict A000009.
A053632 counts compositions by weighted sum, rank statistic A029931/A359042.
A264034 counts partitions by weighted sum, reverse A358194.
A304818 gives weighted sum of prime indices, row-sums of A359361.
A318283 gives weighted sum of reversed prime indices, row-sums of A358136.
A320387 counts multisets by weighted sum, zero-based A359678.
Cf. A000016, A008284, A067538, A222855, A222970, A359755, A360672, A360675, A362559, A362560, A363525, A363528, A363532.

Table[Length[Select[IntegerPartitions[n],Total[Accumulate[Reverse[#]]]==3n&]],{n,0,30}]

A363530 Heinz numbers of integer partitions such that 3*(sum) = (weighted sum).

Original entry on oeis.org

1, 32, 40, 60, 100, 126, 210, 243, 294, 351, 550, 585, 770, 819, 1210, 1274, 1275, 1287, 1521, 1785, 2002, 2366, 2793, 2805, 2875, 3125, 3315, 4025, 4114, 4335, 4389, 4862, 5187, 6325, 6358, 6422, 6783, 7105, 7475, 7581, 8349, 8398, 9386, 9775, 9867, 10925

Offset: 1

Gus Wiseman, Jun 12 2023

nonn

The Heinz number of a partition (y_1,...,y_k) is prime(y_1)*...*prime(y_k). This gives a bijective correspondence between positive integers and integer partitions.

The (one-based) weighted sum of a sequence (y_1,...,y_k) is Sum_{i=1..k} i*y_i. For example, the weighted sum of (4,2,2,1) is 1*4 + 2*2 + 3*2 + 4*1 = 18.

			The terms together with their prime indices begin:
      1: {}
     32: {1,1,1,1,1}
     40: {1,1,1,3}
     60: {1,1,2,3}
    100: {1,1,3,3}
    126: {1,2,2,4}
    210: {1,2,3,4}
    243: {2,2,2,2,2}
    294: {1,2,4,4}
    351: {2,2,2,6}
    550: {1,3,3,5}
    585: {2,2,3,6}
    770: {1,3,4,5}
    819: {2,2,4,6}

These partitions are counted by A363527.
The reverse version is A363531, counted by A363526.
A053632 counts compositions by weighted sum.
A055396 gives minimum prime index, maximum A061395.
A112798 lists prime indices, length A001222, sum A056239.
A264034 counts partitions by weighted sum, reverse A358194.
A304818 gives weighted sum of prime indices, row-sums of A359361.
A318283 gives weighted sum of reversed prime indices, row-sums of A358136.
A320387 counts multisets by weighted sum, zero-based A359678.
Cf. A000041, A000720, A001221, A046660, A106529, A118914, A124010, A181819, A215366, A359362, A359755.

prix[n_]:=If[n==1,{},Flatten[Cases[FactorInteger[n],{p_,k_}:>Table[PrimePi[p],{k}]]]];
Select[Range[1000],3*Total[prix[#]]==Total[Accumulate[Reverse[prix[#]]]]&]

A056239(a(n)) = A304818(a(n))/3.

A363525 Number of integer partitions of n with weighted sum divisible by reverse-weighted sum.

Original entry on oeis.org

1, 2, 2, 3, 2, 4, 2, 4, 5, 5, 3, 10, 4, 7, 13, 10, 8, 29, 10, 18, 39, 20, 20, 70, 29, 40, 105, 65, 55, 166, 73, 132, 242, 141, 129, 476, 183, 248, 580, 487, 312, 984, 422, 868, 1345, 825, 724, 2709, 949, 1505, 2756, 2902, 1611, 4664, 2289, 4942, 5828, 4278

Offset: 1

Gus Wiseman, Jun 10 2023

nonn

The (one-based) weighted sum of a sequence (y_1,...,y_k) is Sum_{i=1..k} i*y_i. This is also the sum of partial sums of the reverse.

			The partition (6,5,4,3,2,1,1,1,1) has weighted sum 80, reverse 160, so is counted under a(24).
The a(n) partitions for n = 1, 2, 4, 6, 9, 12, 14 (A..E = 10-14):
  1  2   4     6       9          C             E
     11  22    33      333        66            77
         1111  222     711        444           65111
               111111  6111       921           73211
                       111111111  3333          2222222
                                  7311          71111111
                                  63111         11111111111111
                                  222222
                                  621111
                                  111111111111

The case of equality (and reciprocal version) is A000005.
The strict case is A363528.
A000041 counts integer partitions, strict A000009.
A053632 counts compositions by weighted sum, rank statistic A029931/A359042.
A264034 counts partitions by weighted sum, reverse A358194.
A304818 gives weighted sum of prime indices, row-sums of A359361.
A318283 gives weighted sum of reversed prime indices, row-sums of A358136.
A320387 counts multisets by weighted sum, zero-based A359678.
A363526 = partitions with weighted sum 3n, ranks A363530, reverse A363531.
Cf. A000016, A008284, A067538, A222855, A222970, A358137, A359755, A362558, A362559, A362560, A363527.

Table[Length[Select[IntegerPartitions[n], Divisible[Total[Accumulate[#]], Total[Accumulate[Reverse[#]]]]&]],{n,30}]

A363528 Number of strict integer partitions of n with weighted sum divisible by reverse-weighted sum.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 1, 3, 1, 1, 3, 1, 2, 6, 2, 3, 9, 3, 4, 11, 4, 5, 16, 6, 8, 24, 8, 10, 31, 11, 14, 41, 18, 18, 59, 21, 27, 74, 30, 32, 100, 35, 43, 128, 54, 53, 173, 58, 78, 215, 81, 88, 294, 97, 123, 362, 150, 146, 469, 162, 221, 577

Offset: 1

Gus Wiseman, Jun 10 2023

nonn

The (one-based) weighted sum of a sequence (y_1,...,y_k) is Sum_{i=1..k} i*y_i. This is also the sum of partial sums of the reverse.

			The a(n) partitions for n = 1, 12, 15, 21, 24, 26:
  (1)  (12)     (15)       (21)          (24)          (26)
       (9,2,1)  (11,3,1)   (15,5,1)      (17,6,1)      (11,8,4,2,1)
                (9,3,2,1)  (16,3,2)      (18,4,2)      (12,6,5,2,1)
                           (11,7,2,1)    (12,9,2,1)    (13,5,4,3,1)
                           (12,5,3,1)    (13,7,3,1)
                           (10,5,3,2,1)  (14,5,4,1)
                                         (15,4,3,2)
                                         (10,8,3,2,1)
                                         (11,6,4,2,1)

The non-strict version is A363525.
A000041 counts integer partitions, strict A000009.
A264034 counts partitions by weighted sum, reverse A358194.
A304818 gives weighted sum of prime indices, row-sums of A359361.
A318283 gives weighted sum of reversed prime indices, row-sums of A358136.
A320387 counts multisets by weighted sum, zero-based A359678.
A363526 counts partitions with weighted sum 3n, reverse A363531.
Cf. A008284, A053632, A067538, A222855, A222970, A358137, A359754, A359755, A362558, A362559, A362560.

Table[Length[Select[IntegerPartitions[n], UnsameQ@@#&&Divisible[Total[Accumulate[#]],Total[Accumulate[Reverse[#]]]]&]],{n,30}]

A337206 Cardinality of maximal level sets of Gini index on integer partitions.

Original entry on oeis.org

1, 1, 1, 1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 5, 5, 7, 8, 9, 11, 13, 15, 17, 21, 23, 28, 33, 38, 44, 52, 60, 72, 81, 95, 112, 128, 147, 175, 195, 233, 267, 305, 353, 412, 462, 533, 617, 703, 807, 932, 1052, 1210, 1389, 1569, 1785, 2060, 2315, 2642, 3023, 3405, 3876, 4413, 4968

Offset: 0

Grant Kopitzke, Aug 18 2020

nonn

a(n) is a lower bound on A076269(n).

			For n=6 the maximal level set of the Gini index contains the partitions (3,3) and (4,1,1). So a(6)=2.

Alois P. Heinz, Table of n, a(n) for n = 0..300
Grant Kopitzke, The Gini Index of an Integer Partition, arXiv:2005.04284 [math.CO], 2020.

Lower bound on A076269.

Cf. A161680, A264034.

b:= proc(n, i, w) option remember; `if`(n=0, 1, `if`(i<1, 0,
      b(n, i-1, w)+expand(x^(w*i)*b(n-i, min(i, n-i), w+1))))
    end:
a:= n-> max(coeffs(b(n$2, 0))):
seq(a(n), n=0..61);  # Alois P. Heinz, Jan 20 2023

m = 75;
p = Product[ 1/(1 - q^Binomial[i + 1, 2] x^i), {i, 1, m}];
psn = Expand@Normal@Series[ p, {x, 0, m}];
psnc = CoefficientList[CoefficientList[psn, {x}, {m}], {q}];
Map[Max, psnc]

G.f.: Product_{n=1..oo} 1/(1-q^(binomial(n+1,2))x^n)-1 = Sum_{n=1..oo} Sum_{lambda a partition of n} q^(binomial(n+1,2)-g(lambda))x^n, where g(lambda) is the Gini index of lambda.

a(n) = max_{k=0..A161680(n)} A264034(n,k). - Alois P. Heinz, Jan 20 2023

Typo in a(43) corrected by Alois P. Heinz, Jan 20 2023

cp's OEIS Frontend

A363527 Number of integer partitions of n with weighted sum 3*n.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A363530 Heinz numbers of integer partitions such that 3*(sum) = (weighted sum).

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

Formula

A363525 Number of integer partitions of n with weighted sum divisible by reverse-weighted sum.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A363528 Number of strict integer partitions of n with weighted sum divisible by reverse-weighted sum.

Views

Author

Keywords

Comments

Examples

Crossrefs

Programs

Mathematica

A337206 Cardinality of maximal level sets of Gini index on integer partitions.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

Extensions