login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A240711 Sum of the largest parts in the partitions of 4n into 4 parts with smallest part = 1. 0
1, 15, 62, 163, 333, 596, 973, 1475, 2130, 2959, 3969, 5192, 6649, 8343, 10310, 12571, 15125, 18012, 21253, 24843, 28826, 33223, 38025, 43280, 49009, 55199, 61902, 69139, 76893, 85220, 94141, 103635, 113762, 124543, 135953, 148056, 160873, 174375, 188630 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
FORMULA
G.f.: x*(7*x^6+27*x^5+43*x^4+52*x^3+33*x^2+13*x+1) / ((x-1)^4*(x^2+x+1)^2). - Colin Barker, Apr 11 2014
EXAMPLE
For a(n) add the parts in the first columns.
13 + 1 + 1 + 1
12 + 2 + 1 + 1
11 + 3 + 1 + 1
10 + 4 + 1 + 1
9 + 5 + 1 + 1
8 + 6 + 1 + 1
7 + 7 + 1 + 1
11 + 2 + 2 + 1
10 + 3 + 2 + 1
9 + 1 + 1 + 1 9 + 4 + 2 + 1
8 + 2 + 1 + 1 8 + 5 + 2 + 1
7 + 3 + 1 + 1 7 + 6 + 2 + 1
6 + 4 + 1 + 1 9 + 3 + 3 + 1
5 + 5 + 1 + 1 8 + 4 + 3 + 1
7 + 2 + 2 + 1 7 + 5 + 3 + 1
5 + 1 + 1 + 1 6 + 3 + 2 + 1 6 + 6 + 3 + 1
4 + 2 + 1 + 1 5 + 4 + 2 + 1 7 + 4 + 4 + 1
3 + 3 + 1 + 1 5 + 3 + 3 + 1 6 + 5 + 4 + 1
1 + 1 + 1 + 1 3 + 2 + 2 + 1 4 + 4 + 3 + 1 5 + 5 + 5 + 1
4(1) 4(2) 4(3) 4(4) .. 4n
------------------------------------------------------------------------
1 15 62 163 .. a(n)
MATHEMATICA
b[n_] := Sum[((4 n - 2 - i)*Floor[(4 n - 2 - i)/2] - i (4 n - 2 - i)) (Floor[(Sign[(Floor[(4 n - 2 - i)/2] - i)] + 2)/2]), {i, 0, 2 n}]; c[1] = 1; c[n_] := Sum[Sum[i (Floor[(Sign[(Floor[(4 n - 2 - j)/2] - j)] + 2)/2]), {i, j + 1, Floor[(4 n - 2 - j)/2]}], {j, 0, 2 n}]; Table[b[n] - c[n], {n, 50}]
PROG
(PARI) Vec(x*(7*x^6+27*x^5+43*x^4+52*x^3+33*x^2+13*x+1)/((x-1)^4*(x^2+x+1)^2) + O(x^100)) \\ Colin Barker, Apr 11 2014
CROSSREFS
Sequence in context: A219819 A157446 A220084 * A212055 A219296 A067572
KEYWORD
nonn,easy
AUTHOR
Wesley Ivan Hurt, Apr 10 2014
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 19 07:04 EDT 2024. Contains 370953 sequences. (Running on oeis4.)