|
%I #40 May 07 2024 15:53:15
%S 0,10,10,20,30,50,80,130,210,340,550,890,1440,2330,3770,6100,9870,
%T 15970,25840,41810,67650,109460,177110,286570,463680,750250,1213930,
%U 1964180,3178110,5142290,8320400,13462690,21783090,35245780,57028870,92274650,149303520,241578170
%N Fibonacci sequence beginning 0, 10.
%D A. T. Benjamin and J. J. Quinn, Proofs that really count: the art of combinatorial proof, M.A.A. 2003, p. 15.
%H Vincenzo Librandi, <a href="/A022093/b022093.txt">Table of n, a(n) for n = 0..1000</a>
%H Tanya Khovanova, <a href="http://www.tanyakhovanova.com/RecursiveSequences/RecursiveSequences.html">Recursive Sequences</a>
%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (1,1).
%F a(n) = 10*F(n) = F(n+4) + F(n+2) + F(n-2) + F(n-4) for n>3, where F = A000045.
%F a(n) = round( (4*phi-2)*phi^n) for n>4. - _Thomas Baruchel_, Sep 08 2004
%F G.f.: 10*x/(1 - x - x^2). - _Philippe Deléham_, Nov 20 2008
%F a(n) = F(n+5) + F(n-5) - 5*F(n) for n>0. - _Bruno Berselli_, Dec 29 2016
%F a(n) = Lucas(n+3) + Lucas(n-3), where Lucas(-i) = (-1)^i*Lucas(i) for the negative indices. - _Bruno Berselli_, Jun 13 2017
%t LinearRecurrence[{1, 1}, {0, 10}, 40] (* _Bruno Berselli_, Dec 30 2016 *)
%t Table[Fibonacci[n + 5] + Fibonacci[n - 5] - 5 Fibonacci[n], {n, 1, 40}] (* _Bruno Berselli_, Dec 30 2016 *)
%t Table[10 Fibonacci[n], {n, 0, 100}] (* _Vincenzo Librandi_, Dec 31 2016 *)
%o (Magma) [10*Fibonacci(n): n in [0..40]]; // _Vincenzo Librandi_, Dec 31 2016
%Y Cf. A000045.
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_.
|
