A096064 Let p(k) = k-th prime; sequence gives primes q of the form q = k*p(k) + 1 for some k.

3, 7, 29, 79, 2137, 3391, 5437, 7603, 25849, 36373, 51059, 54101, 74357, 88327, 92033, 119089, 154387, 179743, 263063, 275813, 328093, 540577, 645529, 671299, 694333, 761713, 824951, 872281, 1133147, 1142809, 1190177, 1206767, 1442333

Offset: 1

Author

Alonso del Arte, Jul 20 2004

Keywords

• nonn

Examples

			29 is in the sequence because the fourth prime is 7 and 4 * 7 + 1 = 29.
		

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A086172, A096065.

Programs

Magma

[a: n in [0..500] | IsPrime(a) where a is NthPrime(n)*n + 1 ]; // Vincenzo Librandi, Oct 05 2012

Mathematica

Select[Table[Prime[n]*n + 1, {n, 455}], PrimeQ]

Extensions

Offset changed from 0 to 1 by Vincenzo Librandi, Oct 05 2012