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!)
A238517 Square row sums of the table A008289 (A060016). 0
1, 1, 1, 2, 2, 5, 6, 11, 14, 26, 34, 52, 79, 110, 162, 231, 328, 446, 660, 872, 1236, 1660, 2327, 3060, 4238, 5586, 7595, 9988, 13376, 17470, 23318, 30286, 39744, 51676, 67276, 86929, 112390, 144472, 185428, 237826, 303171, 386468, 490838, 622882, 786068, 995118, 1249838, 1573522, 1970542 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

Table of n, a(n) for n=0..48.

FORMULA

a(n) = sum(q(n,k)^k,k=0..n), where q(n,k) is the number of partitions of n into k distinct parts (A008289, A060016).

MATHEMATICA

qq[n_] := CoefficientList[Series[Sum[x^Binomial[k+1, 2]y^k/Product[1-x^i, {i, 1, k}], {k, 0, n}], {x, 0, n}, {y, 0, n}], {x, y}]

Total[Transpose[Map[#^2 &, qq[100]]]]

CROSSREFS

Cf. A008289, A060016.

Sequence in context: A241449 A240184 A317853 * A335240 A099926 A181716

Adjacent sequences:  A238514 A238515 A238516 * A238518 A238519 A238520

KEYWORD

nonn

AUTHOR

Emanuele Munarini, Feb 28 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 September 25 14:37 EDT 2022. Contains 356984 sequences. (Running on oeis4.)