login
A053607
Primes p such that a pure prime power occurs between p and the next prime.
3
3, 7, 13, 23, 31, 47, 61, 79, 113, 127, 167, 241, 251, 283, 337, 359, 509, 523, 619, 727, 839, 953, 1021, 1327, 1367, 1669, 1847, 2039, 2179, 2207, 2399, 2803, 3121, 3469, 3719, 4093, 4483, 4909, 5039, 5323, 6229, 6553, 6857, 6883, 7919, 8191, 9403, 10193
OFFSET
1,1
EXAMPLE
127 belongs here because 128 = 2^7 occurs between 127 and 131.
MATHEMATICA
lim = 10^4; pwrs = Sort[Flatten[Table[Prime[n]^i, {n, 1, PrimePi[Sqrt[lim]]}, {i, 2, Log[Prime[n], lim]}]]]; Union[NextPrime[pwrs, -1]] (* T. D. Noe, Mar 11 2013 *)
CROSSREFS
Sequence in context: A291546 A134197 A053001 * A209407 A124129 A101301
KEYWORD
nonn
AUTHOR
Labos Elemer, Feb 09 2000
STATUS
approved