A229030 Smallest of the first six consecutive primes that comprise three sets of primes with difference 2*n.
5, 7, 251, 683, 2017, 18679, 13499, 608131, 97213, 937127, 891997, 531359, 490283, 637171, 892321, 21954731, 5995783, 3440627, 12024413, 3697249, 2674579, 95270633, 165066283, 25091659, 465512447, 161732947, 88360297, 804346451, 286775719, 198215821
Offset: 1
Keywords
Examples
Difference two - primes: 5, 7, 11, 13, 17, 19. Difference four - primes: 7, 11, 13, 17, 19, 23. Difference six - primes: 251, 257, 263, 269, 271, 277.
Programs
-
Mathematica
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 *)
Comments