A053607 Primes p such that a pure prime power occurs between p and the next prime.

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

Links

T. D. Noe, Table of n, a(n) for n = 1..10000

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

Cf. A051701, A025475.

Sequence in context: A291546 A134197 A053001 * A209407 A124129 A101301

Adjacent sequences: A053604 A053605 A053606 * A053608 A053609 A053610

Keyword

nonn

Author

Labos Elemer, Feb 09 2000

Status

approved