A173054 - OEIS

%I #6 Mar 31 2012 12:38:28

%S 17,32,57,100,145,177,320,368,593,945,1124,1649,2169,2530,4240,5392,

%T 7073,8361,16580,18785,20412,23401,32993,60049,65792,69632,94932,

%U 131361,178478,262468,268705,397585,423393,524649,533169,1048976,1058576

%N Numbers of the form a^b+b^a, a > 1, b > a.

%C 2^3+3^2=17,..

%H T. D. Noe, <a href="/A173054/b173054.txt">Table of n, a(n) for n=1..1000</a>

%t f[a_,b_]:=a^b+b^a; Take[Union[Flatten[Table[f[a,b],{a,2,50},{b,a+1,50}]]],80]

%t nn=10^50; n=1; Union[Reap[While[n++; k=n+1; num=n^k+k^n; num<nn, Sow[num]; While[k++; num=n^k+k^n; num<nn, Sow[num]]]][[2,1]]]

%Y Cf. A076980

%K nonn

%O 1,1

%A _Vladimir Joseph Stephan Orlovsky_, Feb 08 2010