A073652 Primes which occur as the difference of consecutive prime powers >1 as and when they occur.

7, 2, 5, 17, 17, 3, 41, 13, 151, 17, 307, 199, 139, 271, 1217, 7, 751, 3617, 4241, 3343, 4001, 97169, 40841, 117017, 746153, 203897, 137542193, 256534591, 123090449

Offset: 1

Author

Amarnath Murthy, Aug 10 2002

Keywords

• nonn

Comments

Conjecture: Every prime is a member.

These are the prime terms of A053707 in the order that they are found. Odd primes will be found only when one of the consecutive powers is a power of 2.

Examples

			41 is a member with 41 = 13^2- 2^7.
		

Crossrefs

Cf. A076047, A077273

Programs

Mathematica

t = {}; Do[If[! PrimeQ[n] && PrimePowerQ[n], AppendTo[t, n]], {n, 3000000}]; Select[Differences[t], PrimeQ] (* Jayanta Basu, Jul 04 2013 *)

Extensions

Corrected, extended, and edited by T. D. Noe, Apr 12 2009