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

1, 3, 4, 9, 13, 12, 19, 27, 40, 39, 61, 36, 61, 57, 88, 81, 127, 120, 187, 117, 196, 183, 283, 108, 205, 183, 280, 171, 289, 264, 409, 243, 412, 381, 589, 360, 607, 561, 868, 351, 655, 588, 901, 549, 928, 849, 1315, 324, 715, 615, 928, 549, 937, 840, 1303, 513

Offset: 0

Author

Roger L. Bagula, Mar 15 2006

Keywords

• nonn
• easy

Links

• G. C. Greubel, Table of n, a(n) for n = 0..2500

Crossrefs

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

Programs

Mathematica

b[0] := 0; b[1] := 1;
b[n_?EvenQ] := b[n] = 3*b[n/2];
b[n_?OddQ] := b[n] = 4*b[(n - 1)/2] + b[(n - 3)/2];
Table[b[n], {n, 1, 70}]

Formula

From G. C. Greubel, Oct 30 2016: (Start)

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

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

Extensions

New name using formula, Joerg Arndt, Dec 17 2022