A173055 Numbers of the form a^b+b^a, a and b are odd primes, b > a.
368, 2530, 94932, 178478, 1596520, 48989176, 129145076, 1162268326, 1221074418, 1996813914, 94143190994, 96951758924, 762940872982, 19073488804224, 36314872537968, 68630377389272, 232630924325880, 617673396313738
Offset: 1
Keywords
Programs
-
Mathematica
f[a_,b_]:=Prime[a]^Prime[b]+Prime[b]^Prime[a]; Take[Union[Flatten[Table[f[a,b],{a,2,60},{b,a+1,60}]]],40]
Comments