|
|
A287171
|
|
Initial prime in set of 4 consecutive primes in arithmetic progression with difference 78.
|
|
2
|
|
|
998051413, 4976990483, 5038640083, 5280622483, 5901887533, 6840045103, 8733200093, 11838052453, 11978292923, 12348742883, 12844988753, 13009792643, 13658681843, 13849573433
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Select[Partition[Prime[Range[7*10^8]], 4, 1], Differences[#]=={78, 78, 78}&][[All, 1]] (* Harvey P. Dale, Mar 17 2018 *)
|
|
PROG
|
(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
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|