%I #4 Mar 31 2012 12:38:17
%S -1,0,4,-14197
%N a(0)=1; a(n)=n^(n+a(n-1))-a(n-1)^(n+a(n-1)).
%t lst={};a=1;Do[a=n^(n+a)-a^(n+a);AppendTo[lst,a],{n,0,3}];lst
%Y Cf. A084964, A152832, A152833, A152835, A152836, A152837, A152838, A152839
%K sign
%O 0,3
%A _Vladimir Joseph Stephan Orlovsky_, Dec 14 2008
%E Indices added to definition, offset corrected - _R. J. Mathar_, Jan 08 2009