A096345 Primes of the form p*q - p - q, where p and q are two successive primes.

7, 23, 59, 191, 839, 1439, 1931, 5039, 8447, 11447, 23399, 26891, 36479, 41579, 46619, 57119, 59999, 77279, 110879, 163199, 232307, 323759, 370871, 414731, 470579, 521267, 566999, 606791, 664199, 678971, 776159, 824459, 835379, 879839, 919631, 1183739, 1190279

Offset: 1

Author

Giovanni Teofilatto, Jun 29 2004

Keywords

• nonn

Comments

These primes are not the sum of two squares.

The number of terms less than 10^n: 1, 3, 5, 9, 18, 35, 83, 190, 425, 1105, 2962, 7695, 20187, 54280, 147464, 402660, 1116912, ..., . - Robert G. Wilson v, Apr 09 2008

Examples

			a(3)=59 because 7*11 - 7 - 11=59.
		

Links

• Robert G. Wilson v, Table of n, a(n) for n=1..7700

Crossrefs

Primes in A037165.

Programs

Mathematica

lst = {}; p = q = 2; Do[p = q; q = NextPrime@q; r = p*q - p - q; If[ PrimeQ@r, AppendTo[lst, r]], {n, 300}]; lst (* Robert G. Wilson v, Apr 09 2008 *)
Select[Times@@#-#[[1]]-#[[2]]&/@Partition[Prime[Range[300]],2,1],PrimeQ] (* Harvey P. Dale, Feb 17 2025 *)

Extensions

More terms from Robert G. Wilson v, Jul 01 2004