OFFSET
0,1
MATHEMATICA
k=3; lst={k}; Do[k=2^k-k; AppendTo[lst, k], {n, 4}]; lst (* Vladimir Joseph Stephan Orlovsky, Nov 19 2010 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Mar 21 2005
EXTENSIONS
The next term, approximately 8.913731*10^40403553, is too large to include.
STATUS
approved