|
|
A103436
|
|
a(n) = Sum_{i>=1} i^n*Fibonacci(i)/2^i.
|
|
2
|
|
|
2, 10, 94, 1330, 25102, 592210, 16765774, 553755730, 20902816462, 887654387410, 41883261304654, 2173850952162130, 123085699242396622, 7550010173496390610, 498737656015015238734, 35298805253912253800530
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
REFERENCES
|
A. T. Benjamin and J. J. Quinn, Proofs that really count: the art of combinatorial proof, M.A.A. 2003, p. 141.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = (PolyLog(-n, (1 + sqrt(5))/4) - PolyLog(-n, (1 - sqrt(5))/4))/sqrt(5). - Vladimir Reshetnikov, Jan 20 2011
|
|
MATHEMATICA
|
a[n_] := Simplify[(PolyLog[-n, GoldenRatio/2] - PolyLog [-n, (1-GoldenRatio)/2]) / Sqrt[5]]; Array[a, 20, 0] (* Amiram Eldar, Jun 16 2020 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|