This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A173054 #9 Jul 04 2025 19:21:20 %S A173054 17,32,57,100,145,177,320,368,593,945,1124,1649,2169,2530,4240,5392, %T A173054 7073,8361,16580,18785,20412,23401,32993,60049,65792,69632,94932, %U A173054 131361,178478,262468,268705,397585,423393,524649,533169,1048976,1058576 %N A173054 Numbers of the form x^y + y^x, 1 < x < y. %H A173054 T. D. Noe, <a href="/A173054/b173054.txt">Table of n, a(n) for n=1..1000</a> %e A173054 17 is in the sequence because 17 = 2^3 + 3^2. %t A173054 f[a_,b_]:=a^b+b^a; Take[Union[Flatten[Table[f[a,b],{a,2,50},{b,a+1,50}]]],80] %t A173054 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 A173054 Cf. A076980, A385232, A385614. %K A173054 nonn,easy %O A173054 1,1 %A A173054 _Vladimir Joseph Stephan Orlovsky_, Feb 08 2010