login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A206039 Values of the difference d for 5 primes in arithmetic progression with the minimal start sequence {5 + j*d}, j = 0 to 4. 9
6, 12, 42, 48, 96, 126, 252, 426, 474, 594, 636, 804, 1218, 1314, 1428, 1566, 1728, 1896, 2106, 2574, 2694, 2898, 3162, 3366, 4332, 4368, 4716, 4914, 4926, 4962, 5472, 5586, 5796, 5838, 6048, 7446, 7572, 7818, 8034, 8958, 9168, 9204, 9714 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

The computations were done without any assumptions on the form of d.

All terms are multiples of 6. - Zak Seidov, Jan 07 2014

LINKS

Sameen Ahmed Khan, Table of n, a(n) for n = 1..10000

S. A. Khan, Primes in Geometric-Arithmetic Progression, arXiv preprint arXiv:1203.2083, 2012. - From N. J. A. Sloane, Sep 15 2012

EXAMPLE

d = 12 then {5, 5 + 1*12, 5 + 2*12, 5 + 3*12, 5 + 4*12} = {5, 17, 29, 41, 53}, which is 5 primes in arithmetic progression.

MATHEMATICA

t={}; Do[If[PrimeQ[{5, 5 + d, 5 + 2*d, 5 + 3*d, 5 +4*d}] == {True, True, True, True, True}, AppendTo[t, d]], {d, 10000}]; t

Select[Range[10000], AllTrue[5+#*Range[0, 4], PrimeQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, May 09 2015 *)

CROSSREFS

Cf. A040976, A206037, A206038, A206040, A206041, A206042, A206043, A206044, A206045.

Sequence in context: A007121 A152786 A267309 * A048069 A152787 A060551

Adjacent sequences:  A206036 A206037 A206038 * A206040 A206041 A206042

KEYWORD

nonn

AUTHOR

Sameen Ahmed Khan, Feb 03 2012

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy .

Last modified August 23 11:46 EDT 2017. Contains 290995 sequences.