login
a(1) = 1, a(n) = 2*a(n-1) if n is even; a(n) = a(n-1)*Fibonacci((n+1)/2)/Fibonacci((n-1)/2) if n is odd.
1

%I #21 Aug 02 2016 18:21:21

%S 1,2,2,4,8,16,24,48,80,160,256,512,832,1664,2688,5376,8704,17408,

%T 28160,56320,91136,182272,294912,589824,954368,1908736,3088384,

%U 6176768,9994240,19988480,32342016,64684032,104660992,209321984,338690048,677380096,1096024064

%N a(1) = 1, a(n) = 2*a(n-1) if n is even; a(n) = a(n-1)*Fibonacci((n+1)/2)/Fibonacci((n-1)/2) if n is odd.

%C a(n)/a(n-1) apparently tends to phi = A001622 if n=odd; e.g. a(21)/a(20) = 91136/56320 = 1.61818...

%C a(n)/a(n-2) apparently tends to 1+sqrt(5) = 3.236...= A134945; where a(21)/a(19) = 91136/28160 = 3.23636...

%C a(1)=1, a(2)=2, a(3)=2, for n>3 a(n)=2*a(n-1) if n is even and a(n)=2*(a(n-1)-a(n-2)+a(n-3)) if n is odd. - _Vincenzo Librandi_, Dec 06 2010

%H Colin Barker, <a href="/A171648/b171648.txt">Table of n, a(n) for n = 1..1000</a>

%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,2,0,4).

%F a(1) = 1, a(n) = 2*a(n-1) if n is even; a(n) = a(n-1)*A000045((n+1)/2)/A000045((n-1)/2) if n is odd.

%F From _Colin Barker_, Aug 02 2016: (Start)

%F a(n) = 2*a(n-2) + 4*a(n-4) for n>4.

%F G.f.: x*(1+2*x) / (1-2*x^2-4*x^4).

%F (End)

%e a(8) = 48 = 2*a(7) = 2*24. a(9) = 80 = (5/3)*48 since Fibonacci(5) = 5 and Fibonacci(4) = 3.

%o (PARI) Vec(x*(1+2*x)/(1-2*x^2-4*x^4) + O(x^50)) \\ _Colin Barker_, Aug 02 2016

%Y Cf. A063727 (bisection), A103435 (bisection).

%K nonn,easy

%O 1,2

%A _Gary W. Adamson_, Dec 13 2009

%E Defined "F", removed abundant parentheses, added punctuation to examples, added a factor to the definition, corrected a(13) and added more terms - _R. J. Mathar_, Dec 15 2009