|
Search: id:A118399
|
|
|
| A118399 |
|
Eigenvector of the triangle of distinct partitions (A008289), so that: a(n) = Sum_{k=1..tri(n)} A008289(n,k)*a(k) for n>=1 with a(1)=1, where tri(n) = floor((sqrt(8*n+1)-1)/2). |
|
+0
1
|
|
| 1, 1, 2, 2, 3, 5, 6, 8, 11, 15, 18, 24, 29, 37, 47, 57, 69, 86, 103, 125, 154, 183, 220, 264, 316, 375, 450, 533, 631, 747, 882, 1035, 1222, 1428, 1674, 1959, 2282, 2653, 3088, 3578, 4142, 4790, 5525, 6363, 7330, 8410, 9644, 11050, 12633, 14424, 16459, 18743
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
PROGRAM
|
(PARI) {a(n)=if(n<0, 0, if(n==1, 1, sum(k=1, floor((sqrt(8*n+1)-1)/2), a(k)*polcoeff(polcoeff(prod(i=1, n, 1+y*x^i, 1+x*O(x^n)), n, x), k, y))))}
|
|
CROSSREFS
|
Cf. A008289.
Sequence in context: A050046 A052337 A121081 this_sequence A076571 A084783 A129838
Adjacent sequences: A118396 A118397 A118398 this_sequence A118400 A118401 A118402
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Paul D. Hanna (pauldhanna(AT)juno.com), May 07 2006
|
|
|
Search completed in 0.002 seconds
|
