OFFSET
0,3
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..16
MAPLE
b:= proc(n) option remember; `if`(n<2, [n$2], [b(n-1)[1]*
4^b(n-1)[2]+b(n-2)[1], b(n-1)[2]+b(n-2)[2]])
end:
a:= n-> b(n)[1]:
seq(a(n), n=0..11);
CROSSREFS
KEYWORD
nonn
AUTHOR
Alois P. Heinz, Oct 25 2018
STATUS
approved