|
|
A206043
|
|
Values of the difference d for 9 primes in arithmetic progression with the minimal start sequence {11 + j*d}, j = 0 to 8.
|
|
9
|
|
|
32671170, 54130440, 59806740, 145727400, 224494620, 246632190, 280723800, 301125300, 356845020, 440379870, 486229380, 601904940, 676987920, 777534660, 785544480, 789052530, 799786890, 943698210, 1535452800, 1536160080, 1760583300, 1808008020
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
The computations were done without any assumptions on the form of d.
|
|
LINKS
|
|
|
EXAMPLE
|
d = 54130440 then {11, 54130451, 108260891, 162391331, 216521771, 270652211, 324782651, 378913091, 433043531} which is 9 primes in arithmetic progression.
|
|
MATHEMATICA
|
a = 11; t = {}; Do[If[PrimeQ[{a, a + d, a + 2*d, a + 3*d, a + 4*d, a + 5*d, a + 6*d, a + 7*d, a + 8*d}] == {True, True, True, True, True, True, True, True, True}, AppendTo[t, d]], {d, 10^9}]; t
|
|
PROG
|
(PARI) forstep(k=210, 1e10, 210, forstep(p=k+11, 8*k+11, k, if(!isprime(p), next(2))); print1(k", ")) \\ Charles R Greathouse IV, Feb 09 2012
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|