OFFSET
0,2
LINKS
FORMULA
MATHEMATICA
Join[{1, a = 15}, Table[a=16*a, {n, 0, 30}]] (* Vladimir Joseph Stephan Orlovsky, Jun 10 2011 *)
Join[{1}, NestList[16#&, 15, 20]] (* Harvey P. Dale, Dec 28 2016 *)
PROG
(PARI) a(n)=if(n, 15<<(4*n-4), 1) \\ Charles R Greathouse IV, Jun 10 2011
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Paul Barry, Nov 30 2003
STATUS
approved