%I #12 Jan 17 2015 23:21:42
%S 3,5,27,134217701
%N a(0) = 3; a(n+1) = 2^a(n) - a(n).
%t k=3;lst={k};Do[k=2^k-k;AppendTo[lst,k],{n,4}];lst (* _Vladimir Joseph Stephan Orlovsky_, Nov 19 2010 *)
%K nonn
%O 0,1
%A _N. J. A. Sloane_, Mar 21 2005
%E The next term, approximately 8.913731*10^40403553, is too large to include.
|