|
|
A151574
|
|
a(0)=1, a(1)=2; a(2^i + j) = a(j) + 2*a(j+1) for 0 <= j < 2^i.
|
|
16
|
|
|
1, 2, 5, 12, 5, 12, 29, 22, 5, 12, 29, 22, 29, 70, 73, 32, 5, 12, 29, 22, 29, 70, 73, 32, 29, 70, 73, 80, 169, 216, 137, 42, 5, 12, 29, 22, 29, 70, 73, 32, 29, 70, 73, 80, 169, 216, 137, 42, 29, 70, 73, 80, 169, 216, 137, 90, 169, 216, 233, 418, 601, 490, 221, 52, 5, 12, 29, 22, 29
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
a = {1, 2}; Do[AppendTo[a, a[[j]] + 2 a[[j + 1]]], {i, 6}, {j, 2^i}]; a (* Ivan Neretin, Jun 28 2017 *)
|
|
CROSSREFS
|
For the recurrence a(2^i+j) = C*a(j) + D*a(j+1), a(0) = A, a(1) = B for following values of (A B C D) see: (0 1 1 1) A118977, (1 0 1 1) A151702, (1 1 1 1) A151570, (1 2 1 1) A151571, (0 1 1 2) A151572, (1 0 1 2) A151703, (1 1 1 2) A151573, (1 2 1 2) A151574, (0 1 2 1) A160552, (1 0 2 1) A151704, (1 1 2 1) A151568, (1 2 2 1) A151569, (0 1 2 2) A151705, (1 0 2 2) A151706, (1 1 2 2) A151707, (1 2 2 2) A151708.
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|