OFFSET
0,2
LINKS
FORMULA
MAPLE
a := proc(n) option remember; `if`(n < 3, [1, 2, 4][n+1], 3*a(n-1) + 2*a(n-2)) end:
seq(a(n), n=0..26);
MATHEMATICA
Join[{1}, LinearRecurrence[{3, 2}, {2, 4}, 26]] (* Jean-François Alcover, Jul 13 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Peter Luschny, Jan 06 2019
STATUS
approved