0,1

a(n)=a(n-1)^n, a(0)=2. a(n)=A000079(A000142(n)).

a=2; lst={}; Do[a=a^n; AppendTo[lst, a], {n, 1, 7}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), May 26 2009]

Sequence in context: A032082 A088895 A075806 this_sequence A067700 A037010 A114695

Adjacent sequences: A050920 A050921 A050922 this_sequence A050924 A050925 A050926

easy,nonn

Klaus Strassburger (strass(AT)ddfi.uni-duesseldorf.de), Dec 30 1999