|
|
A123082
|
|
Prime trios of form k, k+6, k+12.
|
|
2
|
|
|
5, 11, 17, 7, 13, 19, 11, 17, 23, 17, 23, 29, 31, 37, 43, 41, 47, 53, 47, 53, 59, 61, 67, 73, 67, 73, 79, 97, 103, 109, 101, 107, 113, 151, 157, 163, 167, 173, 179, 227, 233, 239, 251, 257, 263, 257, 263, 269, 271, 277, 283, 347, 353, 359, 367, 373, 379, 557, 563
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MAPLE
|
i:=1:for k from 1 to 1200 do if isprime(k) and isprime(k+6)and isprime(k+12) then a[i]:=k:a[i+1]:=k+6:a[i+2]:=k+12:i:=i+3 fi od: seq(a[n], n=1..i-1);
|
|
MATHEMATICA
|
#+{0, 6, 12}&/@Select[Prime[Range[150]], AllTrue[#+{6, 12}, PrimeQ]&] // Flatten (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Apr 26 2019 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|