cp's OEIS Frontend

A206038 Values of the difference d for 4 primes in arithmetic progression with the minimal start sequence {5 + j*d}, j = 0 to 3.

%I A206038 #14 Oct 20 2014 17:15:13
%S A206038 6,12,18,42,48,54,84,96,126,132,252,348,396,426,438,474,594,636,642,
%T A206038 648,678,804,858,1176,1218,1272,1302,1314,1362,1428,1482,1566,1692,
%U A206038 1728,1896,1992,2064,2106,2238,2394,2442,2574,2616,2688,2694,2706,2832,2856,2898
%N A206038 Values of the difference d for 4 primes in arithmetic progression with the minimal start sequence {5 + j*d}, j = 0 to 3.
%C A206038 The computations were done without any assumptions on the form of d.
%H A206038 Sameen Ahmed Khan, <a href="/A206038/b206038.txt">Table of n, a(n) for n = 1..10000</a>
%H A206038 S. A. Khan, <a href="http://arxiv.org/abs/1203.2083">Primes in Geometric-Arithmetic Progression</a>, arXiv preprint arXiv:1203.2083, 2012. - From _N. J. A. Sloane_, Sep 15 2012
%e A206038 d = 18 then {5, 5 + 1*18, 5 + 2*18, 5 + 3*18} = {5, 23, 41, 59}, which is 4 primes in arithmetic progression.
%t A206038 t={}; Do[If[PrimeQ[{5, 5 + d, 5 + 2*d, 5 + 3*d}] == {True, True, True, True}, AppendTo[t, d]], {d, 3000}]; t
%Y A206038 Cf. A040976, A206037 - A206045.
%K A206038 nonn
%O A206038 1,1
%A A206038 _Sameen Ahmed Khan_, Feb 03 2012