A116552 - OEIS

%I #14 Dec 17 2022 06:57:02

%S 1,3,4,9,13,12,19,27,40,39,61,36,61,57,88,81,127,120,187,117,196,183,

%T 283,108,205,183,280,171,289,264,409,243,412,381,589,360,607,561,868,

%U 351,655,588,901,549,928,849,1315,324,715,615,928,549,937,840,1303,513

%N a(2*n+1) = 3*a(n), a(2*n+2) = 4*a(n) + a(n-1).

%H G. C. Greubel, <a href="/A116552/b116552.txt">Table of n, a(n) for n = 0..2500</a>

%F From _G. C. Greubel_, Oct 30 2016: (Start)

%F a(2*n+1) = 3*a(n).

%F a(2*n+2) = 4*a(n) + a(n-1). (End)

%t b[0] := 0; b[1] := 1;

%t b[n_?EvenQ] := b[n] = 3*b[n/2];

%t b[n_?OddQ] := b[n] = 4*b[(n - 1)/2] + b[(n - 3)/2];

%t Table[b[n], {n, 1, 70}]

%Y Cf. A116528, A116529, A116553, A116554, A116555.

%K nonn,easy

%O 0,2

%A _Roger L. Bagula_, Mar 15 2006

%E New name using formula, _Joerg Arndt_, Dec 17 2022