A168088 a(n) = 2^tetranacci(n).
1, 1, 1, 2, 2, 4, 16, 256, 32768, 536870912, 72057594037927936, 324518553658426726783156020576256, 411376139330301510538742295639337626245683966408394965837152256
Offset: 0
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..16
- Index to divisibility sequences
Programs
-
Mathematica
a={1,0,0,0};Flatten[Prepend[Table[s=Plus@@a;a=RotateLeft[a];z=a[[ -1]]=s;z=2^z,{n,12}],Table[0,{m,Length[a]-1}]]] 2^LinearRecurrence[{1,1,1,1},{0,0,0,1},15] (* Harvey P. Dale, Dec 12 2017 *)
Formula
a(n) = 2^A000078(n).
Extensions
a(0)-a(2) and offset corrected by Charles R Greathouse IV, Jul 19 2012