A198381 -id:A198381 - cp's OEIS frontend

A006128 Total number of parts in all partitions of n. Also, sum of largest parts of all partitions of n.

0, 1, 3, 6, 12, 20, 35, 54, 86, 128, 192, 275, 399, 556, 780, 1068, 1463, 1965, 2644, 3498, 4630, 6052, 7899, 10206, 13174, 16851, 21522, 27294, 34545, 43453, 54563, 68135, 84927, 105366, 130462, 160876, 198014, 242812, 297201, 362587, 441546, 536104, 649791, 785437, 947812, 1140945, 1371173, 1644136, 1968379, 2351597, 2805218, 3339869, 3970648, 4712040, 5584141, 6606438, 7805507, 9207637

Offset: 0

N. J. A. Sloane, Colin Mallows

a(n) = degree of Kac determinant at level n as polynomial in the conformal weight (called h). (Cf. C. Itzykson and J.-M. Drouffe, Statistical Field Theory, Vol. 2, p. 533, eq.(98); reference p. 643, Cambridge University Press, (1989).) - Wolfdieter Lang
Also the number of one-element transitions from the integer partitions of n to the partitions of n-1 for labeled parts with the assumption that from any part z > 1 one can take an element of amount 1 in one way only. That means z is composed of z unlabeled parts of amount 1, i.e. z = 1 + 1 + ... + 1. E.g., for n=3 to n=2 we have a(3) = 6 and [111] --> [11], [111] --> [11], [111] --> [11], [12] --> [11], [12] --> [2], [3] --> [2]. For the case of z composed by labeled elements, z = 1_1 + 1_2 + ... + 1_z, see A066186. - Thomas Wieder, May 20 2004
Number of times a derivative of any order (not 0 of course) appears when expanding the n-th derivative of 1/f(x). For instance (1/f(x))'' = (2 f'(x)^2-f(x) f''(x)) / f(x)^3 which makes a(2) = 3 (by counting k times the k-th power of a derivative). - Thomas Baruchel, Nov 07 2005
Starting with offset 1, = the partition triangle A008284 * [1, 2, 3, ...]. - Gary W. Adamson, Feb 13 2008
Starting with offset 1 equals A000041: (1, 1, 2, 3, 5, 7, 11, ...) convolved with A000005: (1, 2, 2, 3, 2, 4, ...). - Gary W. Adamson, Jun 16 2009
Apart from initial 0 row sums of triangle A066633, also the Möbius transform is A085410. - Gary W. Adamson, Mar 21 2011
More generally, the total number of parts >= k in all partitions of n equals the sum of k-th largest parts of all partitions of n. In this case k = 1. Apart from initial 0 the first column of A181187. - Omar E. Pol, Feb 14 2012
Row sums of triangle A221530. - Omar E. Pol, Jan 21 2013
From Omar E. Pol, Feb 04 2021: (Start)
a(n) is also the total number of divisors of all positive integers in a sequence with n blocks where the m-th block consists of A000041(n-m) copies of m, with 1 <= m <= n. The mentioned divisors are also all parts of all partitions of n.
Apart from initial zero this is also as follows:
Convolution of A000005 and A000041.
Convolution of A006218 and A002865.
Convolution of A341062 and A000070.
Row sums of triangles A221531, A245095, A339258, A340525, A340529. (End)
Number of ways to choose a part index of an integer partition of n, i.e., partitions of n with a selected position. Selecting a part value instead of index gives A000070. - Gus Wiseman, Apr 19 2021

			For n = 4 the partitions of 4 are [4], [2, 2], [3, 1], [2, 1, 1], [1, 1, 1, 1]. The total number of parts is 12. On the other hand, the sum of the largest parts of all partitions is 4 + 2 + 3 + 2 + 1 = 12, equaling the total number of parts, so a(4) = 12. - _Omar E. Pol_, Oct 12 2018

S. M. Luthra, On the average number of summands in partitions of n, Proc. Nat. Inst. Sci. India Part. A, 23 (1957), p. 483-498.
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

T. D. Noe and Vaclav Kotesovec, Table of n, a(n) for n = 0..10000 (terms 0..1000 from T. D. Noe)
Paul Erdős and Joseph Lehner, The distribution of the number of summands in the partitions of a positive integer, Duke Math. J. 8, (1941), 335-345.
John A. Ewell, Additive evaluation of the divisor function, Fibonacci Quart. 45 (2007), no. 1, 22-25. See Table 1.
Guo-Niu Han, An explicit expansion formula for the powers of the Euler Product in terms of partition hook lengths, arXiv:0804.1849 [math.CO], 2008; see p.27
I. Kessler and M. Livingston, The expected number of parts in a partition of n, Monatsh. Math. 81 (1976), no. 3, 203-212.
I. Kessler and M. Livingston, The expected number of parts in a partition of n, Monatsh. Math. 81 (1976), no. 3, 203-212.
Martin Klazar, What is an answer? — remarks, results and problems on PIO formulas in combinatorial enumeration, part I, arXiv:1808.08449 [math.CO], 2018.
Vaclav Kotesovec, Graph - The asymptotic ratio
Arnold Knopfmacher and Neville Robbins, Identities for the total number of parts in partitions of integers, Util. Math. 67 (2005), 9-18.
S. M. Luthra, On the average number of summands in partitions of n, Proc. Nat. Inst. Sci. India Part. A, 23 (1957), p. 483-498.
C. L. Mallows & N. J. A. Sloane, Emails, May 1991
C. L. Mallows & N. J. A. Sloane, Emails, Jun. 1991
Ljuben Mutafchiev, On the Largest Part Size and Its Multiplicity of a Random Integer Partition, arXiv:1712.03233 [math.PR], 2017.
Omar E. Pol, Illustration of initial terms
J. Sandor, D. S. Mitrinovic, B. Crstici, Handbook of Number Theory I, Volume 1, Springer, 2005, p. 495.
Eric Weisstein's World of Mathematics, q-Polygamma Function, q-Pochhammer Symbol.
H. S. Wilf, A unified setting for selection algorithms (II), Annals Discrete Math., 2 (1978), 135-148.

Cf. A093694, A008284, A000005, A066633, A085410, A046746, A209423, A285220, A336902, A336903.
Main diagonal of A210485.
Column k=1 of A256193.
The version for normal multisets is A001787.
The unordered version is A001792.
The strict case is A015723.
The version for factorizations is A066637.
A000041 counts partitions.
A000070 counts partitions with a selected part.
A336875 counts compositions with a selected part.
A339564 counts factorizations with a selected factor.
Cf. A066186, A083710, A130689, A264401, A276024, A343341.

List([0..60],n->Length(Flat(Partitions(n)))); # Muniru A Asiru, Oct 12 2018

a006128 = length . concat . ps 1 where
   ps _ 0 = [[]]
   ps i j = [t:ts | t <- [i..j], ts <- ps t (j - t)]
-- Reinhard Zumkeller, Jul 13 2013

g:= add(n*x^n*mul(1/(1-x^k), k=1..n), n=1..61):
a:= n-> coeff(series(g,x,62),x,n):
seq(a(n), n=0..61);
# second Maple program:
a:= n-> add(combinat[numbpart](n-j)*numtheory[tau](j), j=1..n):
seq(a(n), n=0..61);  # Alois P. Heinz, Aug 23 2019

a[n_] := Sum[DivisorSigma[0, m] PartitionsP[n - m], {m, 1, n}]; Table[ a[n], {n, 0, 41}]
CoefficientList[ Series[ Sum[n*x^n*Product[1/(1 - x^k), {k, n}], {n, 100}], {x, 0, 100}], x]
a[n_] := Plus @@ Max /@ IntegerPartitions@ n; Array[a, 45] (* Robert G. Wilson v, Apr 12 2011 *)
Join[{0}, ((Log[1 - x] + QPolyGamma[1, x])/(Log[x] QPochhammer[x]) + O[x]^60)[[3]]] (* Vladimir Reshetnikov, Nov 17 2016 *)
Length /@ Table[IntegerPartitions[n] // Flatten, {n, 50}] (* Shouvik Datta, Sep 12 2021 *)

f(n)= {local(v,i,k,s,t);v=vector(n,k,0);v[n]=2;t=0;while(v[1]1,i--;s+=i*(v[i]=(n-s)\i));t+=sum(k=1,n,v[k]));t } /* Thomas Baruchel, Nov 07 2005 */

a(n) = sum(m=1, n, numdiv(m)*numbpart(n-m)) \\ Michel Marcus, Jul 13 2013

from sympy import divisor_count, npartitions
def a(n): return sum([divisor_count(m)*npartitions(n - m) for m in range(1, n + 1)]) # Indranil Ghosh, Apr 25 2017

G.f.: Sum_{n>=1} n*x^n / Product_{k=1..n} (1-x^k).
G.f.: Sum_{k>=1} x^k/(1-x^k) / Product_{m>=1} (1-x^m).
a(n) = Sum_{k=1..n} k*A008284(n, k).
a(n) = Sum_{m=1..n} of the number of divisors of m * number of partitions of n-m.
Note that the formula for the above comment is a(n) = Sum_{m=1..n} d(m)*p(n-m) = Sum_{m=1..n} A000005(m)*A000041(n-m), if n >= 1. - Omar E. Pol, Jan 21 2013
Erdős and Lehner show that if u(n) denotes the average largest part in a partition of n, then u(n) ~ constant*sqrt(n)*log n.
a(n) = A066897(n) + A066898(n), n>0. - Reinhard Zumkeller, Mar 09 2012
a(n) = A066186(n) - A196087(n), n >= 1. - Omar E. Pol, Apr 22 2012
a(n) = A194452(n) + A024786(n+1). - Omar E. Pol, May 19 2012
a(n) = A000203(n) + A220477(n). - Omar E. Pol, Jan 17 2013
a(n) = Sum_{m=1..p(n)} A194446(m) = Sum_{m=1..p(n)} A141285(m), where p(n) = A000041(n), n >= 1. - Omar E. Pol, May 12 2013
a(n) = A198381(n) + A026905(n), n >= 1. - Omar E. Pol, Aug 10 2013
a(n) = O(sqrt(n)*log(n)*p(n)), where p(n) is the partition function A000041(n). - Peter Bala, Dec 23 2013
a(n) = Sum_{m=1..n} A006218(m)*A002865(n-m), n >= 1. - Omar E. Pol, Jul 14 2014
From Vaclav Kotesovec, Jun 23 2015: (Start)
Asymptotics (Luthra, 1957): a(n) = p(n) * (C*N^(1/2) + C^2/2) * (log(C*N^(1/2)) + gamma) + (1+C^2)/4 + O(N^(-1/2)*log(N)), where N = n - 1/24, C = sqrt(6)/Pi, gamma is the Euler-Mascheroni constant A001620 and p(n) is the partition function A000041(n).
The formula a(n) = p(n) * (sqrt(3*n/(2*Pi)) * (log(n) + 2*gamma - log(Pi/6)) + O(log(n)^3)) in the abstract of the article by Kessler and Livingston (cited also in the book by Sandor, p. 495) is incorrect!
Right is: a(n) = p(n) * (sqrt(3*n/2)/Pi * (log(n) + 2*gamma - log(Pi^2/6)) + O(log(n)^3))
or a(n) ~ exp(Pi*sqrt(2*n/3)) * (log(6*n/Pi^2) + 2*gamma) / (4*Pi*sqrt(2*n)).
(End)
G.f.: (log(1-x) + psi_x(1))/(log(x) * (x)inf), where psi_q(z) is the q-digamma function, and (q)_inf is the q-Pochhammer symbol (the Euler function). - _Vladimir Reshetnikov, Nov 17 2016
a(n) = Sum_{m=1..n} A341062(m)*A000070(n-m), n >= 1. - Omar E. Pol, Feb 05 2021 2014

A206437 Triangle read by rows: T(j,k) is the k-th part of the j-th region of the set of partitions of n, if 1 <= j <= A000041(n).

Original entry on oeis.org

1, 2, 1, 3, 1, 1, 2, 4, 2, 1, 1, 1, 3, 5, 2, 1, 1, 1, 1, 1, 2, 4, 2, 3, 6, 3, 2, 2, 1, 1, 1, 1, 1, 1, 1, 3, 5, 2, 4, 7, 3, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 4, 2, 3, 6, 3, 2, 2, 5, 4, 8, 4, 3, 2, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1

Offset: 1

Omar E. Pol, Feb 14 2012

Here the j-th "region" of the set of partitions of n (or more simply the j-th "region" of n) is defined to be the first h elements of the sequence formed by the smallest parts in nonincreasing order of the partitions of the largest part of the j-th partition of n, with the list of partitions in colexicographic order, where h = j - i, and i is the index of the previous partition of n whose largest part is greater than the largest part of the j-th partition of n, or i = 0 if such previous largest part does not exist. The largest part of the j-th region of n is A141285(j) and the number of parts is h = A194446(j).
Some properties of the regions of n:
- The number of regions of n equals the number of partitions of n (see A000041).
- The set of regions of n contain the sets of regions of all positive integers previous to n.
- The first j regions of n are also first j regions of all integers greater than n.
- The sums of all largest parts of all regions of n equals the total number of parts of all regions of n. See A006128(n).
- If T(j,1) is a record in the sequence then the leading diagonals of triangle formed by the first j rows give the partitions of n (see example).
- The rank of a region is the largest part minus the number of parts (see A194447).
- The sum of all ranks of the regions of n is equal to zero.
How to make a diagram of the regions and partitions of n: in the first quadrant of the square grid we draw a horizontal line {[0, 0],[n, 0]} of length n. Then we draw a vertical line {[0, 0],[0, p(n)]} of length p(n) where p(n) is the number of partitions of n. Then, for j = 1..p(n), we draw a horizontal line {[0, j],[g, j]} where g = A141285(j) is the largest part of the j-th partition of n, with the list of partitions in colexicographic order. Then, for n = 1 .. p(n), we draw a vertical line from the point [g,j] down to intercept the next segment in a lower row. So we have a number of closed regions. Then we divide each region of n in horizontal rectangles with shorter sides = 1. We can see that in the original rectangle of area n*p(n) each row contains a set of rectangles whose areas are equal to the parts of one of the partitions of n. Then each region of n is labeled according to the position of its largest part on axis "y". Note that each region of n is similar to a mirror version of the Young diagram of one of the partitions of s, where s is the sum of all parts of the region. See the illustrations of the seven regions of 5 in the Links section.
Note that if row j of triangle contains parts of size 1 then the parts of row j are the smallest parts of all partitions of T(j,1), (see A046746), and also T(j,1) is a record in the sequence and also j is the number of partitions of T(j,1), (see A000041). Otherwise, if row j does not contain parts of size 1 then the parts of row j are the emergent parts of the next record in the sequence (see A183152). Row j is also the partition of A186412(j).
Also triangle read by rows in which row r lists the parts of the last section of the set of partitions of r, ordered by regions, such that the previous parts to the part of size r are the emergent parts of the partitions of r (see A138152) and the rest are the smallest parts of the partitions of r (see example). - Omar E. Pol, Apr 28 2012

			-------------------------------------------
  Region j   Triangle of parts
-------------------------------------------
  1          1;
  2          2,1;
  3          3,1,1;
  4          2;
  5          4,2,1,1,1;
  6          3;
  7          5,2,1,1,1,1,1;
  8          2;
  9          4,2;
  10         3;
  11         6,3,2,2,1,1,1,1,1,1,1;
  12         3;
  13         5,2;
  14         4;
  15         7,3,2,2,1,1,1,1,1,1,1,1,1,1,1;
.
The rotated triangle shows each row as a partition:
                             7
                           4   3
                         5       2
                       3   2       2
                     6               1
                   3   3               1
                 4       2               1
               2   2       2               1
             5               1               1
           3   2               1               1
         4       1               1               1
       2   2       1               1               1
     3       1       1               1               1
   2   1       1       1               1               1
 1   1   1       1       1               1               1
.
Alternative interpretation of this sequence:
Triangle read by rows in which row r lists the parts of the last section of the set of partitions of r ordered by regions (see comments):
   [1];
   [2,1];
   [3,1,1];
   [2],[4,2,1,1,1];
   [3],[5,2,1,1,1,1,1];
   [2],[4,2],[3],[6,3,2,2,1,1,1,1,1,1,1];
   [3],[5,2],[4],[7,3,2,2,1,1,1,1,1,1,1,1,1,1,1];

Robert Price, Table of n, a(n) for n = 1..321, first 75 regions.
Omar E. Pol, Illustration of the seven regions of 5
Omar E. Pol, Illustration of initial terms, regions = 1..77 (2D view)
Omar E. Pol, Illustration of initial terms, regions = 1..30 (3D view)
Omar E. Pol, Visualization of regions in a diagram for A006128
Robert Price, Mathematica program to draw diagram up to n=28

Positive integers in A193870. Column 1 is A141285. Row j has length A194446(j). Row sums give A186412. Records are A000027.

Cf. A000041, A046746, A135010, A138121, A182699, A182703, A182709, A183152, A186114, A187219, A194436-A194439, A194447, A194448, A196025, A198381.

lex[n_]:=DeleteCases[Sort@PadRight[Reverse /@ IntegerPartitions@n], x_ /; x==0, 2];
reg = {}; l = {};
For[j = 1, j <= 22, j++,
  mx = Max@lex[j][[j]]; AppendTo[l, mx];
  For[i = j, i > 0, i--, If[l[[i]] > mx, Break[]]];
  AppendTo[reg, Take[Reverse[First /@ lex[mx]], j - i]];
  ];
Flatten@reg  (* Robert Price, Apr 21 2020, revised Jul 24 2020 *)

Further edited by Omar E. Pol, Mar 31 2012, Jan 27 2013
Minor edits by Omar E. Pol, Apr 23 2020
Comments corrected (following a suggestion from Peter Munn) by Omar E. Pol, Jul 20 2025

A196025 Total sum of parts greater than 1 in all the partitions of n except one copy of the smallest part greater than 1 of every partition.

Original entry on oeis.org

0, 0, 0, 2, 5, 16, 30, 63, 108, 189, 298, 483, 720, 1092, 1582, 2297, 3225, 4551, 6244, 8592, 11590, 15622, 20741, 27536, 36066, 47198, 61150, 79077, 101391, 129808, 164934, 209213, 263745, 331807, 415229, 518656, 644719, 799926, 988432, 1218979

Offset: 1

Omar E. Pol, Oct 27 2011

nonn

Also partial sums of A182709. Total sum of emergent parts in all partitions of all numbers <= n.

Also total sum of parts of all regions of n that do not contain 1 as a part (Cf. A083751, A187219). - Omar E. Pol, Mar 04 2012

Vaclav Kotesovec, Table of n, a(n) for n = 1..10000

Cf. A026905, A046746, A066186, A135010, A138121, A182699, A182707, A182709, A183152, A193827, A196039, A196930, A196931, A198381.

a(n) = A066186(n) - A196039(n).

a(n) ~ exp(Pi*sqrt(2*n/3)) / (4*sqrt(3)). - Vaclav Kotesovec, Jul 06 2019

A210942 Triangle read by rows in which row n lists the parts > 1 of the n-th region of the shell model of partitions, with a(1) = 1.

Original entry on oeis.org

1, 2, 3, 2, 4, 2, 3, 5, 2, 2, 4, 2, 3, 6, 3, 2, 2, 3, 5, 2, 4, 7, 3, 2, 2, 2, 4, 2, 3, 6, 3, 2, 2, 5, 4, 8, 4, 3, 2, 2, 2, 2, 3, 5, 2, 4, 7, 3, 2, 2, 3, 6, 3, 5, 9, 4, 3, 3, 2, 2, 2, 2, 2, 4, 2, 3, 6, 3, 2, 2, 5, 4, 8, 4, 3, 2, 2, 2, 2, 4, 7, 3, 6, 5, 10, 5

Offset: 1

Omar E. Pol, Apr 18 2012

For the definition of "region of n" see A206437. See also A186114. Row n lists the largest part and the parts > 1 of the n-th region of the shell model of partitions. Also 1 together with the numbers > 1 of A206437.

			Written as a triangle begins:
1;
2;
3;
2;
4,2;
3;
5,2,
2;
4,2;
3;
6,3,2,2;
3;
5,2;
4;
7,3,2,2;

Omar E. Pol, Illustration of the seven regions of 5
Omar E. Pol, Illustration of the partitions and regions of n, for n = 1..12

Column 1 is A141285. Records give A000027. The n-th record is T(A000041(n),1).

Cf. A135010, A138121, A182699, A182709, A183152, A186114, A187219, A194436-A194439, A194447-A194448, A196025, A198381, A206437, A210941.

A196039 Total sum of the smallest part of every partition of every shell of n.

Original entry on oeis.org

0, 1, 4, 9, 18, 30, 50, 75, 113, 162, 231, 318, 441, 593, 798, 1058, 1399, 1824, 2379, 3066, 3948, 5042, 6422, 8124, 10264, 12884, 16138, 20120, 25027, 30994, 38312, 47168, 57955, 70974, 86733, 105676, 128516, 155850, 188644, 227783, 274541

Offset: 0

Omar E. Pol, Oct 27 2011

nonn

Partial sums of A046746.

Total sum of parts of all regions of n that contain 1 as a part. - Omar E. Pol, Mar 11 2012

			For n = 5 the seven partitions of 5 are:
5
3         + 2
4             + 1
2     + 2     + 1
3         + 1 + 1
2     + 1 + 1 + 1
1 + 1 + 1 + 1 + 1
.
The five shells of 5 (see A135010 and also A138121), written as a triangle, are:
1
2, 1
3, 1, 1
4, (2, 2), 1, 1, 1
5, (3, 2), 1, 1, 1, 1, 1
.
The first "2" of row 4 does not count, also the "3" of row 5 does not count, so we have:
1
2, 1
3, 1, 1
4, 2, 1, 1, 1
5, 2, 1, 1, 1, 1, 1
.
thus a(5) = 1+2+1+3+1+1+4+2+1+1+1+5+2+1+1+1+1+1 = 30.

Vaclav Kotesovec, Table of n, a(n) for n = 0..10000 (terms 0..1000 from Alois P. Heinz)
Omar E. Pol, Illustration of the seven regions of 5

Cf. A026905, A046746, A066186, A135010, A138121, A182699, A182707, A182709, A183152, A193827, A196025, A196930, A196931, A198381, A206437.

b:= proc(n, i) option remember;
     `if`(n=i, n, 0) +`if`(i<1, 0, b(n, i-1) +`if`(nAlois P. Heinz, Apr 03 2012

b[n_, i_] := b[n, i] = If[n == i, n, 0] + If[i < 1, 0, b[n, i-1] + If[n < i, 0, b[n-i, i]]]; Accumulate[Table[b[n, n], {n, 0, 50}]] (* Jean-François Alcover, Feb 05 2017, after Alois P. Heinz *)

a(n) = A066186(n) - A196025(n).

a(n) ~ exp(Pi*sqrt(2*n/3)) / (2*Pi*sqrt(2*n)). - Vaclav Kotesovec, Jul 06 2019

cp's OEIS Frontend

A006128 Total number of parts in all partitions of n. Also, sum of largest parts of all partitions of n.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

GAP

Haskell

Maple

Mathematica

PARI

PARI

Python

Formula

A206437 Triangle read by rows: T(j,k) is the k-th part of the j-th region of the set of partitions of n, if 1 <= j <= A000041(n).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

Extensions

A196025 Total sum of parts greater than 1 in all the partitions of n except one copy of the smallest part greater than 1 of every partition.

Views

Author

Keywords

Comments

Links

Crossrefs

Formula

A210942 Triangle read by rows in which row n lists the parts > 1 of the n-th region of the shell model of partitions, with a(1) = 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

A196039 Total sum of the smallest part of every partition of every shell of n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula