|
|
A207527
|
|
Primes that are the sum of three consecutive primes in A034962.
|
|
1
|
|
|
131, 251, 337, 503, 743, 929, 1447, 1597, 3023, 3919, 4051, 4157, 5087, 5897, 6133, 7649, 7877, 8269, 9181, 9433, 9721, 11411, 11677, 13151, 13757, 14009, 14533, 18133, 18493, 18743, 20563, 21023, 21247, 22651, 22921, 23057, 23801, 23893, 24359, 24733, 24809
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
t = Select[Table[Prime[n] + Prime[n + 1] + Prime[n + 2], {n, 1000}], PrimeQ]; Select[Table[t[[n]] + t[[n + 1]] + t[[n + 2]], {n, Length[t] - 2}], PrimeQ]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|