Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A000643
a(n) = a(n-1) + 2^a(n-2).
2
0, 0, 1, 2, 4, 8, 24, 280, 16777496, 1942668892225729070919461906823518906642406839052139521251812409738904285205225275672
OFFSET
0,4
COMMENTS
The next term is too large to include.
The next term has 5050530 digits. - Harvey P. Dale, Jan 05 2024
REFERENCES
D. E. Knuth, personal communication.
MATHEMATICA
Off[General::ovfl]; a={1, 0}; Flatten[Prepend[Table[s=Plus@@a; a=2^(RotateLeft[a]); a[[ -1]]=s, {n, 8}], Table[0, {m, Length[a]-1}]]] (* Vladimir Joseph Stephan Orlovsky, Nov 18 2009 *)
nxt[{a_, b_}]:={b, b+2^a}; NestList[nxt, {0, 0}, 9][[;; , 1]] (* Harvey P. Dale, Jan 05 2024 *)
CROSSREFS
Cf. A000659.
Sequence in context: A066535 A134455 A191700 * A261489 A286936 A323948
KEYWORD
nonn
EXTENSIONS
1 more term from Vladeta Jovovic, Mar 19 2000
STATUS
approved