|
| |
|
|
A000643
|
|
a(n)=a(n-1) + 2^a(n-2).
|
|
2
| | |
|
|
|
OFFSET
| 0,4
|
|
|
COMMENTS
| The next term is too large to include.
|
|
|
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}]]] [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Nov 18 2009]
|
|
|
CROSSREFS
| Cf. A000659.
Sequence in context: A004528 A066535 A191700 * A196265 A112285 A037170
Adjacent sequences: A000640 A000641 A000642 * A000644 A000645 A000646
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com).
|
|
|
EXTENSIONS
| 1 more term from Vladeta Jovovic (vladeta(AT)eunet.rs), Mar 19 2000
|
| |
|
|
