A116493 Numbers k such that the difference between k-th prime and next prime is 70.

15783, 15927, 16879, 18266, 19466, 22292, 26186, 33806, 37668, 38333, 38432, 42892, 43407, 45053, 52934, 54738, 54854, 56812, 57314, 58394, 61165, 72298, 79627, 80258, 81214, 83711, 83730, 83886, 89236, 92187, 92609, 94910, 95317, 95807, 98103, 100205, 106516

Offset: 1

Author

Zak Seidov, Feb 17 2006

Keywords

• nonn

Examples

			p(15784) - p(15783) = 173429 - 173359 = 70.
		

Links

• Jinyuan Wang, Table of n, a(n) for n = 1..5000
• Index entries for primes, gaps between

Crossrefs

Cf. A204792, A116495, A116496, A116497.

Programs

Mathematica

Select[Range[95317],NextPrime[Prime[#]]-Prime[#]==70&] (* James C. McMahon, Aug 20 2024 *)

PARI

lista(nn) = {pr = primes(nn); for (n = 1, nn-1, if (pr[n+1] - pr[n] == 70, print1(n, ", ")););} \\ Michel Marcus, Oct 09 2013

Formula

A204792(n) = prime(a(n)). - R. J. Mathar, Apr 30 2024

Extensions

Name edited by James C. McMahon, Aug 20 2024