|
|
A096208
|
|
Primes expressible as a sum of odd-indexed primes.
|
|
0
|
|
|
2, 7, 89, 659, 1181, 5021, 9923, 10909, 11941, 17959, 26879, 48437, 53077, 65707, 71191, 74051, 119723, 135019, 147151, 173053, 226381, 293177, 323797, 362911, 411449, 470621, 478321, 542251, 575837, 592987, 646259, 721141, 730819, 740599
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(3) = 89 because 89 = 2 + 5 + 11 + 17 + 23 + 31.
|
|
MATHEMATICA
|
Select[Table[Plus @@ Prime[2Range[i] - 1], {i, 1000}], PrimeQ[ # ] &]
|
|
PROG
|
(PARI) lista(nn) = {s = 0; add = 1; forprime(p=1, nn, if (add, s += p; if (isprime(s), print1(s, ", ")); ); add = ! add; ); } \\ Michel Marcus, Oct 21 2015
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|