A066846 Numbers of the form a^a + b^b, a >= b > 0.

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

Links

Table of n, a(n) for n=0..35.

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. A000312, A218346, A218347.

Cf. A068145: primes of the form a^a + b^b.

Sequence in context: A209865 A128600 A078993 * A304043 A290594 A140275

Adjacent sequences: A066843 A066844 A066845 * A066847 A066848 A066849

Keyword

easy,nonn

Author

Leroy Quet, Jan 20 2002

Extensions

Name improved by Alex Ratushnyak, Oct 26 2012

Status

approved