A287171 Initial prime in set of 4 consecutive primes in arithmetic progression with difference 78.

998051413, 4976990483, 5038640083, 5280622483, 5901887533, 6840045103, 8733200093, 11838052453, 11978292923, 12348742883, 12844988753, 13009792643, 13658681843, 13849573433

Offset: 1

Author

Zak Seidov, May 27 2017

Keywords

• nonn

Comments

a(1) = 998051413 = A052239(13).

Links

• Charles R Greathouse IV, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A052239.

Programs

Mathematica

Select[Partition[Prime[Range[7*10^8]],4,1],Differences[#]=={78,78,78}&][[All,1]] (* Harvey P. Dale, Mar 17 2018 *)

PARI

p=2;q=3;r=5; forprime(s=7,, if(s-r==78 && r-q==78 && q-p==78, print1(p", ")); p=q; q=r; r=s) \\ Charles R Greathouse IV, May 27 2017

Formula

a(n) >> n log^4 n. - Charles R Greathouse IV, May 28 2017