The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A282464 a(n) = Sum_{i=0..n} i*Fibonacci(i)^2. 4
 0, 1, 3, 15, 51, 176, 560, 1743, 5271, 15675, 45925, 133056, 381888, 1087645, 3077451, 8658951, 24245655, 67602608, 187789616, 519924075, 1435228575, 3951341811, 10852291273, 29740435200, 81340229376, 222058995001, 605201766675, 1646862596223, 4474969884411 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 LINKS Bruno Berselli, Table of n, a(n) for n = 0..1000 Index entries for linear recurrences with constant coefficients, signature (5,-4,-10,10,4,-5,1). FORMULA O.g.f.: x*(1 - 2*x + 4*x^2 - 2*x^3 + x^4)/((1 - x)*(1 + x)^2*(1 - 3*x + x^2)^2). a(n) = 5*a(n-1) - 4*a(n-2) - 10*a(n-3) + 10*a(n-4) + 4*a(n-5) - 5*a(n-6) + a(n-7). a(n) = ((n-1)*Fibonacci(n) + n*Fibonacci(n-1))*Fibonacci(n) + (1 - (-1)^n)/2. MAPLE with(combinat): P:=proc(q) local a, n; a:=0; print(a); for n from 1 to q do a:=a+n*fibonacci(n)^2; print(a); od; end: P(100); # Paolo P. Lava, Feb 17 2017 MATHEMATICA a[n_] := Sum[i*Fibonacci[i]^2, {i, 0, n}]; Table[a[n], {n, 0, 30}] (* Jean-François Alcover, Feb 16 2017 *) PROG (PARI) a(n) = sum(i=0, n, i*fibonacci(i)^2) \\ Colin Barker, Feb 16 2017 (Sage) [sum(i*fibonacci(i)^2 for i in [0..n]) for n in range(30)] (Maxima) makelist(sum(i*fib(i)^2, i, 0, n), n, 0, 30) (MAGMA) [&+[i*Fibonacci(i)^2: i in [0..n]]: n in [0..30]]; CROSSREFS Cf. A000045. Partial sums of A169630. Cf. A014286: partial sums of i*Fibonacci(i). Cf. A064831: partial sums of (n+1-i)*Fibonacci(i)^2. Sequence in context: A165746 A248122 A118126 * A284663 A231747 A192742 Adjacent sequences:  A282461 A282462 A282463 * A282465 A282466 A282467 KEYWORD nonn,easy AUTHOR Bruno Berselli, Feb 16 2017 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 5 18:48 EDT 2020. Contains 334854 sequences. (Running on oeis4.)