%I A122491
%S A122491 0,0,0,2,5,13,28,58,114,218,407,747,1352,2420,4292,7554,13209,22969,39748,
%T A122491 68494,117590,201210,343275,584087,991440,1679208,2838408,4789058,8066669,
%U A122491 13566373,22782892,38209762,64003002,107083610,178967807,298803459,498404504
%N A122491 a(n) = n*Fib(n) - sum_{i=0..n} Fib(i).
%F A122491 a(n) = n*Fibonacci(n) - Fibonacci(n+2) + 1 - Stefan Steinerberger (stefan.steinerberger(AT)gmail.com), 
               Feb 22 2008
%e A122491 a(5) = 13 because Fib(5) = 5, times 5 = 25 and subtract sum(Fib(5))=12 
               to get 13
%p A122491 with(combinat, fibonacci): for i from 1 to 30 do i*fibonacci(i) - sum(fibonacci(k), 
               k=0..i); end do;
%t A122491 Table[n*Fibonacci[n] - Fibonacci[n + 2] + 1, {n, 0, 40}] - Stefan Steinerberger 
               (stefan.steinerberger(AT)gmail.com), Feb 22 2008
%Y A122491 Cf. A000045.
%Y A122491 Sequence in context: A065301 A126656 A026522 this_sequence A002559 A049097 
               A045366
%Y A122491 Adjacent sequences: A122488 A122489 A122490 this_sequence A122492 A122493 
               A122494
%K A122491 nonn
%O A122491 0,4
%A A122491 Ben Thurston (benthurston27(AT)yahoo.com), Sep 16 2006
%E A122491 Edited by N. J. A. Sloane (njas(AT)research.att.com), Sep 17 2006