OFFSET
1,1
COMMENTS
A generalization of A022008. The generalized pattern of consecutive prime-differences is {6a+4,6b+2,6c+4,6d+2,6e+4} with a=c=e=2,b=d=1.
MATHEMATICA
Transpose[Select[Partition[Prime[Range[20000000]], 6, 1], Differences[#] == {16, 8, 16, 8, 16}&]][[1]] (* Harvey P. Dale, Nov 08 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jan 06 2005
STATUS
approved