|
| |
|
|
A089108
|
|
Convoluted convolved Fibonacci numbers G_4^(r).
|
|
1
| |
|
|
3, 5, 7, 10, 13, 16, 20, 24, 28, 33, 38, 43, 49, 55, 61, 68, 75, 82, 90, 98, 106, 115, 124, 133, 143, 153, 163, 174, 185, 196, 208, 220, 232, 245, 258, 271, 285, 299, 313, 328, 343, 358, 374, 390, 406, 423, 440, 457, 475, 493, 511, 530, 549, 568, 588, 608, 628
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
LINKS
| P. Moree, Convoluted convolved Fibonacci numbers
|
|
|
FORMULA
| G.f.: x(x^4-2x^3-x+3)/[(1-x^3)(1-x)^2].
|
|
|
MAPLE
| with(numtheory): f := z->1/(1-z-z^2): m := proc(r, j) d := divisors(r): W := (1/r)*z*sum(mobius(d[i])*f(z^d[i])^(r/d[i]), i=1..nops(d)): Wser := simplify(series(W, z=0, 80)): coeff(Wser, z^j) end: seq(m(r, 4), r=1..60);
|
|
|
CROSSREFS
| Sequence in context: A003070 A036604 A001768 * A186355 A029899 A072166
Adjacent sequences: A089105 A089106 A089107 * A089109 A089110 A089111
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Dec 05 2003
|
|
|
EXTENSIONS
| Edited by Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 06 2004
|
| |
|
|
