[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A033449
Lists of 4 primes in arithmetic progression; common difference 6.
1
251, 257, 263, 269, 1741, 1747, 1753, 1759, 3301, 3307, 3313, 3319, 5101, 5107, 5113, 5119, 5381, 5387, 5393, 5399, 6311, 6317, 6323, 6329, 6361, 6367, 6373, 6379, 12641, 12647, 12653, 12659, 13451, 13457, 13463, 13469, 14741, 14747, 14753
OFFSET
1,1
MAPLE
for i from 1 by 1 to 4000 do if ithprime(i+1) = ithprime(i) +6 and ithprime(i+2) = ithprime(i) + 12 and ithprime(i+3) = ithprime(i) + 18 then print(ithprime(i), ithprime(i+1), ithprime(i+2), ithprime(i+3)); # Zerinvary Lajos, May 04 2007
MATHEMATICA
Select[Partition[Prime[Range[2000]], 4, 1], Differences[#]=={6, 6, 6}&]// Flatten (* Harvey P. Dale, May 31 2019 *)
CROSSREFS
Sequence in context: A267995 A201547 A165281 * A271581 A142419 A364968
KEYWORD
nonn,tabf
AUTHOR
STATUS
approved