A288341 -id:A288341 - cp's OEIS frontend

A001402 Number of partitions of n into at most 6 parts.

1, 1, 2, 3, 5, 7, 11, 14, 20, 26, 35, 44, 58, 71, 90, 110, 136, 163, 199, 235, 282, 331, 391, 454, 532, 612, 709, 811, 931, 1057, 1206, 1360, 1540, 1729, 1945, 2172, 2432, 2702, 3009, 3331, 3692, 4070, 4494, 4935, 5427, 5942, 6510, 7104, 7760, 8442, 9192

Offset: 0

N. J. A. Sloane

Also number of partitions of n into parts <= 6: a(n) = A026820(n,6). - Reinhard Zumkeller, Jan 21 2010
Counts unordered closed walks of weight n on a single vertex graph containing 6 loops of weights 1, 2, 3, 4, 5 and 6. - David Neil McGrath, Apr 11 2015
Number of different distributions of n+21 identical balls in 6 boxes as x,y,z,p,q,m where 0Ece Uslu and Esin Becenen, Jan 11 2016
a(n) could be the total number of non-isomorphic geodetic graphs of diameter n>=2 homeomorphic to the Petersen graph. - Carlos Enrique Frasser, May 24 2018

			The number of partitions of 6 into parts less than or equal to 6 is a(6)=11. These are (6)(51)(42)(33)(411)(321)(222)(3111)(2211)(21111)(111111). - _David Neil McGrath_, Apr 11 2015
a(4) = 5, i.e., {1,2,3,4,5,10},{1,2,3,4,6,9},{1,2,3,4,7,8},{1,2,3,5,6,8},{1,2,4,5,6,7} Number of different distributions of 25 identical balls in 6 boxes as x,y,z,p,q,m where 0 < x < y < z < p < q < m. - _Ece Uslu_, Esin Becenen, Jan 11 2016

A. Cayley, Calculation of the minimum N.G.F. of the binary seventhic, Collected Mathematical Papers. Vols. 1-13, Cambridge Univ. Press, London, 1889-1897, Vol. 10, p. 408-419.
H. Gupta et al., Tables of Partitions. Royal Society Mathematical Tables, Vol. 4, Cambridge Univ. Press, 1958, p. 2.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Washington Bomfim, Table of n, a(n) for n = 0..10000 (first 1001 terms from T. D. Noe)
G. E. Andrews, Partitions: At the Interface of q-Series and Modular Forms, The Ramanujan Journal 7, 385-400 (2003), Eq.(3.10).
A. Cayley, Calculation of the minimum N.G.F. of the binary seventhic, American Journal of Mathematics, Vol. 2, No. 1 (Mar., 1879), pp. 71-84 (14 pages).
A. Cayley, Calculation of the minimum N.G.F. of the binary seventhic, Collected Mathematical Papers. Vols. 1-13, Cambridge Univ. Press, London, 1889-1897, Vol. 10, p. 408-419. [Annotated scanned copy]
C. E. Frasser and G. N. Vostrov, Geodetic Graphs Homeomorphic to a Given Geodetic Graph, arXiv:1611.01873 [cs.DM], 2016. [p. 27]
R. K. Guy, The Second Strong Law of Small Numbers, Math. Mag, 63 (1990), no. 1, 3-20. [Annotated scanned copy]
INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 355
A. V. Sills and D. Zeilberger, Formulae for the number of partitions of n into at most m parts (using the quasi-polynomial ansatz), arXiv:1108.4391 [math.CO], 2011.
Index entries for related partition-counting sequences
Index entries for linear recurrences with constant coefficients, signature (1,1,0,0,-1,0,-2,0,1,1,1,1,0,-2,0,-1,0,0,1,1,-1).

Essentially same as A026812. Cf. A037145 (first differences), A288341 (partial sums).
a(n) = A008284(n+6, 6), n >= 0.
A194197(n) = a(60*n). - Alois P. Heinz, Aug 23 2011

with(combstruct):ZL7:=[S,{S=Set(Cycle(Z,card<7))}, unlabeled]: seq(count(ZL7,size=n),n=0..50);  # Zerinvary Lajos, Sep 24 2007
a:= n-> (Matrix(21, (i,j)-> if (i=j-1) then 1 elif j=1 then [1, 1, 0, 0, -1, 0, -2, 0, 1, 1, 1, 1, 0, -2, 0, -1, 0, 0, 1, 1, -1][i] else 0 fi)^n)[1,1]; seq(a(n), n=0..50);  # Alois P. Heinz, Jul 31 2008
B:=[S,{S = Set(Sequence(Z,1 <= card),card <=6)},unlabelled]: seq(combstruct[count](B, size=n), n=0..50); # Zerinvary Lajos, Mar 21 2009
## more efficient for large arguments (try with 10^100 or 100^1000):
a:= proc(n) local m, r; m := iquo (n, 60, 'r');
(167 +(2325 +(15400 +(47250 +54000*m +4500*r)*m +3150*r +150*r^2)*m
+[0, 795, 1875, 3030, 4500, 6075, 7995, 10050, 12480, 15075, 18075, 21270, 24900, 28755, 33075, 37650, 42720, 48075, 53955, 60150, 66900, 73995, 81675, 89730, 98400, 107475, 117195, 127350, 138180, 149475, 161475, 173970, 187200, 200955, 215475, 230550, 246420, 262875, 280155, 298050, 316800, 336195, 356475, 377430, 399300, 421875, 445395, 469650, 494880, 520875, 547875, 575670, 604500, 634155, 664875, 696450, 729120, 762675, 797355, 832950][r+1])*m
+[0, 63, 207, 348, 570, 795, 1143, 1482, 1968, 2475, 3135, 3828, 4722, 5643, 6795, 8010, 9468, 11007, 12843, 14760, 17010, 19383, 22107, 24978, 28260, 31695, 35583, 39672, 44238, 49035, 54375, 59958, 66132, 72603, 79695, 87120, 95238, 103707, 112923, 122550, 132960, 143823, 155547, 167748, 180870, 194535, 209163, 224382, 240648, 257535, 275535, 294228, 314082, 334683, 356535, 379170, 403128, 427947, 454143, 481260][r+1])*m/6
+[1, 1, 2, 3, 5, 7, 11, 14, 20, 26, 35, 44, 58, 71, 90, 110, 136, 163, 199, 235, 282, 331, 391, 454, 532, 612, 709, 811, 931, 1057, 1206, 1360, 1540, 1729, 1945, 2172, 2432, 2702, 3009, 3331, 3692, 4070, 4494, 4935, 5427, 5942, 6510, 7104, 7760, 8442, 9192, 9975, 10829, 11720, 12692, 13702, 14800, 15944, 17180, 18467][r+1] end:
seq(a(n), n=0..100);  # Alois P. Heinz, Aug 22 2011
A := [1,1,2,3,5,7,11,14,20,26,35,44,58,71,90,110,136,163,199,235,282];
a := proc(n) option remember; if n < 21 then A[n+1] else 1+(a(n-2)+a(n-3)+a(n-4))-(2*a(n-7)+2*a(n-8)+a(n-9))+(a(n-11)+2*a(n-12)+2*a(n-13))-(a(n-16)+a(n-17)+a(n-18))+(a(n-20)) fi end:
seq(a(i),i=0..50); # Peter Luschny, Aug 23 2011
## program using quasi-polynomials; see article by Sills and Zeilberger:
a:= m-> subs (n=m, add ([[n^5/86400 +7*n^4/11520 +77*n^3/6480 +245*n^2/2304 +43981*n/103680 +199577/345600], [-n^2/768 -7*n/256 -581/4608, n^2/768 +7*n/256 +581/4608], [-n/162 -19/324, -n/162 -23/324, n/81 +7/54], [1/32, -1/32, -1/32, 1/32], [1/25, 0, -1/25, -2/25, 2/25], [1/36, -1/36, -1/18, -1/36, 1/36, 1/18]][r][1 +irem (m-1+r, r)], r=1..6)):
seq(a(n), n=0..100);  # Alois P. Heinz, Aug 24 2011
## using Andrews-style expressions; see article by Sills and Zeilberger:
a:= n-> 1 +31*n^2/288 +floor(n/4)/16 -floor(n/4 +1/2)/16 +7*n^4/11520 +floor(n/5)/5 +n^5/86400 -(n^2/384 +7*n/128 +581/2304)*n +(n^2/192 +7*n/64 +581/1152) *floor(n/2) -(n/54 +61/324)*n +(n/54 +19/108) *floor((n+1)/3) +(n/27 +7/18) *floor(n/3) +floor(n/6)/18 -floor(n/6 +2/3)/36 +floor(n/6 +1/3)/18 +floor((n+1)/6)/12 +713*n/1800 +77*n^3/6480:
seq(a(n), n=0..100);  # Alois P. Heinz, Aug 24 2011

CoefficientList[ Series[ 1/((1 - x)*(1 - x^2)*(1 - x^3)*(1 - x^4)*(1 - x^5)*(1 - x^6)), {x, 0, 60} ], x ]
(* Second program: *)
T[n_, k_] := T[n, k] = If[n==0 || k==1, 1, T[n, k-1] + If[k>n, 0, T[n-k, k]]]; a[n_] := T[n, 6]; Table[a[n], {n, 0, 50}] (* Jean-François Alcover, Apr 12 2017, after Alois P. Heinz's code for A026820 *)
Table[Length[IntegerPartitions[n,6]],{n,0,50}] (* Harvey P. Dale, Jul 30 2025 *)

a(n)=floor((6*n^5+315*n^4+6160*n^3+55125*n^2+(216705+9600*(n%3<1))*n+527500)/518400+(n+1)*(n+20)*(-1)^n/768) \\ Tani Akinari, May 27 2014

a(n)={round((n+11)*((6*n^4+249*n^3+2071*n^2-4931*n+40621)/518400+n\2*(n+10) /192+( (n+1)\3+ n\3*2 )/54))};
vector(60,n,n--; a(n)) \\ Washington Bomfim, Jan 16 2021

a(n) = 1 + (a(n-2) + a(n-3) + a(n-4)) - (2*a(n-7) + 2*a(n-8) + a(n-9)) + (a(n-11) + 2*a(n-12) + 2*a(n-13)) - (a(n-16) + a(n-17) + a(n-18)) + (a(n-20)). - Norman J. Meluch (norm(AT)iss.gm.com), Mar 09 2000
G.f.: 1/((1-x)*(1-x^2)*(1-x^3)*(1-x^4)*(1-x^5)*(1-x^6)). - Alois P. Heinz, Aug 22 2011
a(n) ~ n^5 / 86400. - Charles R Greathouse IV, Aug 23 2011
a(n) = (167 + (2325 + (15400 + (47250 + 54000*m + 4500*r)*m + 3150*r + 150*r^2)*m + X(r))*m + Y(r))*m/6 + Z(r) where m = floor(n/60), r = n mod 60 and X, Y, Z are functions of r (see Maple program below). - Alois P. Heinz, Aug 23 2011
a(n) = floor((2 + 3*(floor(n/3) + floor(-n/3))) * (floor(n/3)+1)/54 + (6*n^5 + 315*n^4 + 6160*n^3 + 55125*n^2 + 219905*n + 485700)/518400 + (n+1)*(n+20)*(-1)^n/768). - Tani Akinari, Aug 05 2013
a(n) = a(n-1) + a(n-2) - a(n-5) - 2*a(n-7) + a(n-9) + a(n-10) + a(n-11) + a(n-12) - 2*a(n-14) - a(n-16) + a(n-19) + a(n-20) - a(n-21). - David Neil McGrath, Apr 11 2015
a(n+6) = a(n) + A001401(n). - Ece Uslu, Esin Becenen, Jan 11 2016
a(n) = round((n+11)*((6*n^4 + 249*n^3 + 2071*n^2 - 4931*n + 40621)/518400 + floor(n/2)*(n+10)/192 + (floor((n+1)/3) + 2*floor(n/3))/54)). - Washington Bomfim, Jan 15 2021

A288253 Number of heptagons that can be formed with perimeter n.

Original entry on oeis.org

1, 1, 2, 3, 5, 6, 10, 13, 19, 24, 34, 42, 58, 70, 93, 112, 145, 171, 218, 256, 320, 372, 458, 528, 643, 735, 884, 1006, 1198, 1352, 1597, 1795, 2102, 2350, 2732, 3041, 3513, 3892, 4468, 4934, 5633, 6194, 7037, 7715, 8722, 9531, 10728, 11690

Offset: 7

Seiichi Manyama, Jun 07 2017

Number of (a1, a2, ... , a7) where 1 <= a1 <= ... <= a7 and a1 + a2 + ... + a6 > a7.

Seiichi Manyama, Table of n, a(n) for n = 7..10000
G. E. Andrews, P. Paule and A. Riese, MacMahon's Partition Analysis IX: k-gon partitions, Bull. Austral Math. Soc., 64 (2001), 321-329.
Geoffrey Critzer, Combinatorics of Vector Spaces over Finite Fields, Master's thesis, Emporia State University, 2018. [This thesis cites this sequence entry, but it's just a typo: the intended sequence entry is A288853.]
Index entries for linear recurrences with constant coefficients, signature (0, 1, 0, 1, 0, 0, 1, 0, -1, -1, -1, 0, 0, -2, 0, 0, 1, 1, 0, 1, 2, 1, 0, 1, -1, 0, -1, -2, -1, 0, -1, -1, 0, 0, 2, 0, 0, 1, 1, 1, 0, -1, 0, 0, -1, 0, -1, 0, 1).

Number of k-gons that can be formed with perimeter n: A005044 (k=3), A062890 (k=4), A069906 (k=5), A069907 (k=6), this sequence (k=7), A288254 (k=8), A288255 (k=9), A288256 (k=10).

G.f.: x^7/((1-x)*(1-x^2)* ... *(1-x^7)) - x^12/(1-x) * 1/((1-x^2)*(1-x^4)* ... *(1-x^12)).

a(2*n+12) = A026813(2*n+12) - A288341(n), a(2*n+13) = A026813(2*n+13) - A288341(n) for n >= 0. - Seiichi Manyama, Jun 08 2017

A092905 Triangle, read by rows, such that the partial sums of the n-th row form the n-th diagonal, for n>=0, where each row begins with 1.

Original entry on oeis.org

1, 1, 1, 1, 2, 1, 1, 3, 2, 1, 1, 4, 4, 2, 1, 1, 5, 6, 4, 2, 1, 1, 6, 9, 7, 4, 2, 1, 1, 7, 12, 11, 7, 4, 2, 1, 1, 8, 16, 16, 12, 7, 4, 2, 1, 1, 9, 20, 23, 18, 12, 7, 4, 2, 1, 1, 10, 25, 31, 27, 19, 12, 7, 4, 2, 1, 1, 11, 30, 41, 38, 29, 19, 12, 7, 4, 2, 1, 1, 12, 36, 53, 53, 42, 30, 19, 12, 7, 4, 2, 1

Offset: 0

Paul D. Hanna, Mar 12 2004

Row sums form A000070, which is the partial sums of the partition numbers (A000041). Rows read backwards converge to the row sums (A000070).
From Alford Arnold, Feb 07 2010: (Start)
The table can also be generated by summing sequences embedded within Table A008284
For example,
1 1 1 1 ... yields 1 2 3 4 ...
1 1 2 2 3 3 ... yields 1 2 4 6 9 12 ...
1 1 2 3 4 5 7 ... yields 1 2 4 7 11 16 ...
(End)
T(n,k) is also count of all 'replacable' cells in the (Ferrers plots of) the partitions on n in exactly k parts. [Wouter Meeussen, Sep 16 2010]
From Wolfdieter Lang, Dec 03 2012: (Start)
The triangle entry T(n,k) is obtained from triangle A072233 by summing the entries of column k up to n (see the partial sum type o.g.f. given by Vladeta Jovovic in the formula section).
  Therefore, the  o.g.f. for the sequence in column k is x^k/((1-x)* product(1-x^j,j=1..k)).
The triangle with entry a(n,m) = T(n-1,m-1), n >= 1, m = 1, ..., n, is obtained from the partition array A103921 when in row n all entries belonging to part number m are summed (a conjecture). (End)

			The fourth row (n=3) is {1,3,2,1} and the fourth diagonal is the partial sums of the fourth row: {1,4,6,7,7,7,7,7,...}.
The triangle T(n,k) begins:
n\k 0  1  2  3  4  5  6  7  8  9 10 11 12  ...
0   1
1   1  1
2   1  2  1
3   1  3  2  1
4   1  4  4  2  1
5   1  5  6  4  2  1
6   1  6  9  7  4  2  1
7   1  7 12 11  7  4  2  1
8   1  8 16 16 12  7  4  2  1
9   1  9 20 23 18 12  7  4  2  1
10  1 10 25 31 27 19 12  7  4  2  1
11  1 11 30 41 38 29 19 12  7  4  2  1
12  1 12 36 53 53 42 30 19 12  7  4  2  1
... Reformatted by _Wolfdieter Lang_, Dec 03 2012
T(5,3)=4 because the partitions of 5 in exactly 3 parts are 221 and 311, and they give rise to partitions of 4 in four ways: 221->22 and 211, 311->211 and 31, since both their Ferrers plots have 2 'mobile cells' each. [_Wouter Meeussen_, Sep 16 2010]
T(5,3) = a(6,4) = 4 because the partitions of 6 with 4 parts are 1113 and 1122, with the number of distinct parts 2 and 2, respectively, summing to 4 (see the array A103921). An example for the conjecture given as comment above. - _Wolfdieter Lang_, Dec 03 2012

V. V. Kruchinin, The number of partitions of a natural number n into parts each of which is not less than m, Math. Notes 86 (4) (2009) 505-509
R. J. Mathar, Size of the set of residues of integer powers of fixed exponent, (2017), Table 11.

Antidiagonal sums form the partition numbers (A000041).
Cf. A000070.
Cf. A008284. [Alford Arnold, Feb 07 2010]
Columns: A087811, A000601, A002621, A002622, A288341 - A288345.

Maple
```
T(n,k)=if(n
				
```

(*Needs["DiscreteMath`Combinatorica`"]; partitionexact[n_, m_] := TransposePartition /@ (Prepend[ #1, m] & ) /@ Partitions[n - m, m] *); mobile[p_?PartitionQ]:=1+Count[Drop[p,-1]-Rest[p],?Positive]; Table[Tr[mobile/@partitionexact[n,k]],{n,12},{k,n}] (* _Wouter Meeussen, Sep 16 2010 *)

T(n, k) = sum_{j=0..k} T(n-k, j), with T(n, 0) = 1 for all n>=0. A000070(n) = sum_{k=0..n} T(n, k).

O.g.f.: (1/(1-y))*(1/Product(1-x*y^k, k=1..infinity)). - Vladeta Jovovic, Jan 29 2005

Several corrections by Wolfdieter Lang, Dec 03 2012

A288344 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^9)).

Original entry on oeis.org

1, 2, 4, 7, 12, 19, 30, 45, 67, 97, 138, 192, 265, 359, 482, 639, 840, 1092, 1410, 1803, 2291, 2889, 3621, 4508, 5584, 6875, 8424, 10269, 12463, 15055, 18115, 21704, 25910, 30814, 36522, 43137, 50794, 59618, 69774, 81422, 94760, 109984, 127338, 147058, 169438

Offset: 0

Seiichi Manyama, Jun 08 2017

Number of partitions of at most n into at most 9 parts.

Seiichi Manyama, Table of n, a(n) for n = 0..10000
Richard J. Mathar, Size of the Set of Residues of Integer Powers of Fixed Exponent, research paper, 2017.
Index entries for linear recurrences with constant coefficients, signature (2, 0, -1, 0, -1, 1, -1, 1, 0, -1, 1, 2, -1, 0, 0, -1, -1, 0, 0, -1, 1, 0, 2, 0, 1, -1, 0, 0, -1, -1, 0, 0, -1, 2, 1, -1, 0, 1, -1, 1, -1, 0, -1, 0, 2, -1).

Number of partitions of at most n into at most k parts: A002621 (k=4), A002622 (k=5), A288341 (k=6), A288342 (k=7), A288343 (k=8), this sequence (k=9), A288345 (k=10).

Cf. A288256, A008638 (first differences).

x='x+O('x^99); Vec(1/((1-x)*prod(i=1, 9, (1-x^i)))) \\ Altug Alkan, Mar 28 2018

A288345 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^10)).

Original entry on oeis.org

1, 2, 4, 7, 12, 19, 30, 45, 67, 97, 139, 194, 269, 366, 494, 658, 870, 1137, 1477, 1900, 2430, 3083, 3890, 4874, 6078, 7533, 9294, 11406, 13940, 16955, 20545, 24787, 29800, 35688, 42600, 50670, 60088, 71024, 83714, 98377, 115305, 134771, 157138, 182746, 212038

Offset: 0

Seiichi Manyama, Jun 08 2017

Number of partitions of at most n into at most 10 parts.

Seiichi Manyama, Table of n, a(n) for n = 0..10000
Richard J. Mathar, Size of the Set of Residues of Integer Powers of Fixed Exponent, research paper, 2017.
Index entries for linear recurrences with constant coefficients, signature (2, 0, -1, 0, -1, 1, -1, 1, 0, 0, -1, 2, 0, 0, 1, -2, 0, -1, 0, 0, 0, -2, 3, 0, 1, 0, 1, 0, -1, 0, -1, 0, -3, 2, 0, 0, 0, 1, 0, 2, -1, 0, 0, -2, 1, 0, 0, -1, 1, -1, 1, 0, 1, 0, -2, 1).

Number of partitions of at most n into at most k parts: A002621 (k=4), A002622 (k=5), A288341 (k=6), A288342 (k=7), A288343 (k=8), A288344 (k=9), this sequence (k=10).

Cf. A008639 (first differences).

x='x+O('x^99); Vec(1/((1-x)*prod(i=1, 10, (1-x^i)))) \\ Altug Alkan, Mar 28 2018

A288342 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^7)).

Original entry on oeis.org

1, 2, 4, 7, 12, 19, 30, 45, 66, 94, 132, 181, 246, 328, 433, 564, 728, 929, 1177, 1477, 1841, 2277, 2799, 3417, 4150, 5010, 6019, 7194, 8561, 10140, 11964, 14057, 16457, 19195, 22315, 25854, 29865, 34391, 39493, 45224, 51654, 58844, 66877, 75823, 85776, 96820

Offset: 0

Seiichi Manyama, Jun 08 2017

Number of partitions of at most n into at most 7 parts.

Seiichi Manyama, Table of n, a(n) for n = 0..10000
Richard J. Mathar, Size of the Set of Residues of Integer Powers of Fixed Exponent, research paper, 2017.
Index entries for linear recurrences with constant coefficients, signature (2, 0, -1, 0, -1, 1, -1, 0, 1, 1, 0, 1, -2, 0, 0, -2, 1, 0, 1, 1, 0, -1, 1, -1, 0, -1, 0, 2, -1).

Number of partitions of at most n into at most k parts: A002621 (k=4), A002622 (k=5), A288341 (k=6), this sequence (k=7), A288343 (k=8), A288344 (k=9), A288345 (k=10).

Cf. A288254.

x='x+O('x^99); Vec(1/((1-x)*prod(i=1, 7, (1-x^i)))) \\ Altug Alkan, Mar 28 2018

A288343 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^8)).

Original entry on oeis.org

1, 2, 4, 7, 12, 19, 30, 45, 67, 96, 136, 188, 258, 347, 463, 609, 795, 1025, 1313, 1665, 2099, 2624, 3262, 4026, 4945, 6035, 7332, 8859, 10660, 12764, 15226, 18083, 21402, 25230, 29647, 34713, 40525, 47155, 54719, 63307, 73056, 84074, 96524, 110536, 126301

Offset: 0

Seiichi Manyama, Jun 08 2017

Number of partitions of at most n into at most 8 parts.

Seiichi Manyama, Table of n, a(n) for n = 0..10000
Richard J. Mathar, Size of the Set of Residues of Integer Powers of Fixed Exponent, 2017.
Index entries for linear recurrences with constant coefficients, signature (2, 0, -1, 0, -1, 1, -1, 1, -1, 1, 1, 1, -1, -1, 1, -2, 0, -1, 1, 0, 2, -1, 1, 1, -1, -1, -1, 1, -1, 1, -1, 1, 0, 1, 0, -2, 1).

Number of partitions of at most n into at most k parts: A002621 (k=4), A002622 (k=5), A288341 (k=6), A288342 (k=7), this sequence (k=8), A288344 (k=9), A288345 (k=10).

Cf. A288255.

CoefficientList[Series[1/((1-x)Times@@(1-x^Range[8])),{x,0,50}],x] (* Harvey P. Dale, Dec 06 2017 *)

x='x+O('x^99); Vec(1/((1-x)*prod(i=1, 8, (1-x^i)))) \\ Altug Alkan, Mar 28 2018

cp's OEIS Frontend

A001402 Number of partitions of n into at most 6 parts.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Maple

Mathematica

PARI

PARI

Formula

A288253 Number of heptagons that can be formed with perimeter n.

Views

Author

Keywords

Comments

Links

Crossrefs

Formula

A092905 Triangle, read by rows, such that the partial sums of the n-th row form the n-th diagonal, for n>=0, where each row begins with 1.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

Extensions

A288344 Expansion of 1 / ((1-x)^2*(1-x^2)*(1-x^3)*...*(1-x^9)).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A288345 Expansion of 1 / ((1-x)^2*(1-x^2)*(1-x^3)*...*(1-x^10)).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A288342 Expansion of 1 / ((1-x)^2*(1-x^2)*(1-x^3)*...*(1-x^7)).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

PARI

A288343 Expansion of 1 / ((1-x)^2*(1-x^2)*(1-x^3)*...*(1-x^8)).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

PARI

A288344 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^9)).

A288345 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^10)).

A288342 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^7)).

A288343 Expansion of 1 / ((1-x)^2(1-x^2)(1-x^3)...(1-x^8)).