Search: id:A089108 Results 1-1 of 1 results found. %I A089108 %S A089108 3,5,7,10,13,16,20,24,28,33,38,43,49,55,61,68,75,82,90,98,106,115,124, %T A089108 133,143,153,163,174,185,196,208,220,232,245,258,271,285,299,313,328, %U A089108 343,358,374,390,406,423,440,457,475,493,511,530,549,568,588,608,628 %N A089108 Convoluted convolved Fibonacci numbers G_4^(r). %H A089108 P. Moree, Convoluted convolved Fibonacci numbers %F A089108 G.f.: x(x^4-2x^3-x+3)/[(1-x^3)(1-x)^2]. %p A089108 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); %Y A089108 Sequence in context: A003070 A036604 A001768 this_sequence A029899 A072166 A077000 %Y A089108 Adjacent sequences: A089105 A089106 A089107 this_sequence A089109 A089110 A089111 %K A089108 nonn %O A089108 1,1 %A A089108 N. J. A. Sloane (njas(AT)research.att.com), Dec 05 2003 %E A089108 Edited by Emeric Deutsch (deutsch(AT)duke.poly.edu), Mar 06 2004 Search completed in 0.001 seconds