login
A130100
Perfect powers m^e such that m+e is prime, e>1.
1
1, 8, 9, 25, 32, 64, 81, 121, 225, 289, 441, 512, 729, 841, 1000, 1225, 1521, 1681, 2025, 2048, 2401, 2601, 2744, 3249, 3481, 4096, 4225, 4761, 5041, 5929, 6561, 7569, 7776, 8000, 9025, 9801, 10201, 11025, 11449, 12321, 15625, 16384, 16641, 17576, 18225
OFFSET
1,2
COMMENTS
Intersection of A001597 and A130099.
LINKS
Eric Weisstein's World of Mathematics, Perfect Power
MATHEMATICA
Take[#[[1]]^#[[2]]&/@Select[Tuples[Range[500], 2], PrimeQ[Total[#]] && #[[2]]> 1&]//Union, 50] (* Harvey P. Dale, Jan 18 2021 *)
CROSSREFS
Sequence in context: A124184 A062307 A114130 * A226230 A258400 A173336
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, May 07 2007
STATUS
approved