%I #2 Mar 31 2012 12:38:16
%S 0,-1,-1,3,118,
%T -199068134034785153195409370979964879499768447341765846329146257207125965412281784631240438087
%N Numbers of the form : k=k^n-n^k, (k=1).
%C The next number is too large to include.
%t lst={};k=1;Do[k=k^n-n^k;AppendTo[lst,IntegerPart[k]],{n,6}];lst
%K sign
%O 1,4
%A _Vladimir Joseph Stephan Orlovsky_, Aug 31 2008