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,1

Links

Jinyuan Wang, Table of n, a(n) for n = 1..5000

Index entries for primes, gaps between

Formula

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

Example

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

Mathematica

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

Prog

(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

Crossrefs

Cf. A204792, A116495, A116496, A116497.

Sequence in context: A246042 A235755 A235530 * A061733 A229643 A216180

Adjacent sequences: A116490 A116491 A116492 * A116494 A116495 A116496

Keyword

nonn

Author

Zak Seidov, Feb 17 2006

Extensions

Name edited by James C. McMahon, Aug 20 2024

Status

approved