|
|
A097997
|
|
Primes of the form prime(n) + prime(n+1) + prime(n+4).
|
|
1
|
|
|
29, 37, 47, 59, 67, 79, 103, 131, 151, 167, 193, 233, 263, 293, 307, 317, 337, 347, 359, 379, 419, 433, 467, 499, 557, 571, 613, 743, 761, 797, 823, 977, 997, 1021, 1063, 1091, 1109, 1129, 1163, 1181, 1279, 1373, 1487, 1511, 1553, 1601, 1627, 1657, 1697, 1733
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
a(4) = 59 because 13 + 17 + 29 = 59.
|
|
MATHEMATICA
|
Select[p = Prime@ Range@ 108; p[[#]] + p[[#+1]] + p[[#+4]] & /@ Range@ 104, PrimeQ@# &] (* Robert G. Wilson v, Mar 01 2007 *)
Select[Table[(Prime[n]+Prime[n+1]+Prime[n+4]), {n, 700}], PrimeQ[#]&] (* Vincenzo Librandi, Jul 17 2012 *)
Select[#[[1]]+#[[2]]+#[[5]]&/@Partition[Prime[Range[200]], 5, 1], PrimeQ] (* Harvey P. Dale, Jul 27 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|