|
%I #35 Apr 11 2024 04:20:33
%S 12,25,37,62,99,161,260,421,681,1102,1783,2885,4668,7553,12221,19774,
%T 31995,51769,83764,135533,219297,354830,574127,928957,1503084,2432041,
%U 3935125,6367166,10302291,16669457,26971748,43641205,70612953,114254158,184867111
%N Fibonacci sequence beginning 12, 25.
%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (1,1).
%F G.f.: -(12+13*x) / ( -1+x+x^2 ). - _R. J. Mathar_, Mar 18 2011
%t Join[{a=12,b=25},Table[c=a+b;a=b;b=c,{n,60}]]
%t Transpose[NestList[{Last[#],First[#]+Last[#]}&, {12,25},50]][[1]] (* or *) LinearRecurrence[{1,1},{12,25},40] (* _Harvey P. Dale_, Mar 13 2011 *)
%o (Python)
%o a = [12, 25]
%o [a.append(a[-1] + a[-2]) for n in range(33)]
%o print(a) # _Michael S. Branicky_, Dec 25 2021
%Y Cf. A000032, A000045.
%K nonn,easy
%O 0,1
%A _Vladimir Joseph Stephan Orlovsky_, Feb 28 2011
|
