login
A066846
Numbers of the form a^a + b^b, a >= b > 0.
3
2, 5, 8, 28, 31, 54, 257, 260, 283, 512, 3126, 3129, 3152, 3381, 6250, 46657, 46660, 46683, 46912, 49781, 93312, 823544, 823547, 823570, 823799, 826668, 870199, 1647086, 16777217, 16777220, 16777243, 16777472, 16780341, 16823872, 17600759, 33554432
OFFSET
0,1
EXAMPLE
28 is included because 28 = 1^1 + 3^3.
MATHEMATICA
nn = 10; Select[Union[Flatten[Table[a^a + b^b, {a, nn}, {b, a, nn}]]], # <= nn^nn + 1 &] (* T. D. Noe, Nov 15 2012 *)
CROSSREFS
Cf. A068145: primes of the form a^a + b^b.
Sequence in context: A209865 A128600 A078993 * A304043 A290594 A140275
KEYWORD
easy,nonn
AUTHOR
Leroy Quet, Jan 20 2002
EXTENSIONS
Name improved by Alex Ratushnyak, Oct 26 2012
STATUS
approved