login
Smallest of the first six consecutive primes that comprise three sets of primes with difference 2*n.
9

%I #8 Apr 18 2014 16:38:29

%S 5,7,251,683,2017,18679,13499,608131,97213,937127,891997,531359,

%T 490283,637171,892321,21954731,5995783,3440627,12024413,3697249,

%U 2674579,95270633,165066283,25091659,465512447,161732947,88360297,804346451,286775719,198215821

%N Smallest of the first six consecutive primes that comprise three sets of primes with difference 2*n.

%C An equivalent definition of this sequence: smallest prime which gives a cluster of primes with the spacing pattern 2*n; x; 2*n; x; 2*n, x > 0.

%C A229033 gives the record values.

%H <a href="/index/Pri#gaps">Index entries for primes, gaps between</a>

%e Difference two - primes: 5, 7, 11, 13, 17, 19.

%e Difference four - primes: 7, 11, 13, 17, 19, 23.

%e Difference six - primes: 251, 257, 263, 269, 271, 277.

%t Table[With[{prs=Partition[Prime[Range[42000000]],6,1]},Select[prs, Union[ Take[ Differences[#1],{1,5,2}]]=={2n}&,1][[1,1]]],{n,30}] (* _Harvey P. Dale_, Apr 18 2014 *)

%Y Cf. A000230, A133429, A133430, A226657, A229021, A229028, A229033, A229034.

%K nonn

%O 1,1

%A _Arkadiusz Wesolowski_, Sep 11 2013