|
| |
|
|
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, 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; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,3
|
|
|
PROG
| (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: A052337 A192432 A121081 * A178927 A076571 A084783
Adjacent sequences: A118396 A118397 A118398 * A118400 A118401 A118402
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Paul D. Hanna (pauldhanna(AT)juno.com), May 07 2006
|
| |
|
|
