A243009 Primes p such that (p + 1)/q is a perfect power for some prime q.

2, 7, 11, 17, 19, 23, 31, 43, 47, 53, 67, 71, 79, 97, 103, 107, 127, 151, 163, 179, 191, 199, 211, 223, 241, 251, 271, 283, 331, 337, 367, 383, 431, 449, 463, 467, 487, 499, 523, 547, 577, 587, 607, 631, 647, 683, 691, 719, 751, 787, 823, 827, 881, 907, 967

Offset

1,1

Links

Jens Kruse Andersen, Table of n, a(n) for n = 1..10000

Example

2 is in this sequence because (2 + 1)/3 = 1 = A001597(1), and 2 and 3 are both primes.

Prog

(PARI) isOK(p) = forprime(q=2, p, if(ispower((p+1)/q), return(1))); return(0)
concat(2, select(p->isOK(p), primes(1000))) \\ Colin Barker, Aug 18 2014

Crossrefs

Cf. A001597, A245303.

Sequence in context: A176897 A362770 A166005 * A155009 A045371 A356003

Adjacent sequences: A243006 A243007 A243008 * A243010 A243011 A243012

Keyword

nonn

Author

Juri-Stepan Gerasimov, Aug 18 2014

Extensions

Several terms corrected by Colin Barker, Aug 18 2014

Status

approved