|
|
A291546
|
|
a(n) = Sum_{k=1..n} A073659(k).
|
|
2
|
|
|
1, 3, 7, 13, 23, 31, 43, 59, 73, 97, 127, 149, 167, 193, 227, 263, 283, 311, 349, 389, 421, 463, 509, 557, 601, 653, 709, 769, 823, 881, 947, 997, 1061, 1123, 1193, 1277, 1367, 1439, 1531, 1607, 1693, 1787, 1861, 1949, 2017, 2099, 2179, 2281, 2377, 2477
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
For n > 1, a(n) is a prime.
|
|
LINKS
|
|
|
MATHEMATICA
|
|
|
PROG
|
(PARI) v=[1]; n=1; vp=[1]; while(n<200, if(isprime(p=n+vecsum(v)) && !vecsearch(vecsort(v), n), v=concat(v, n); vp = concat(vp, p); n=0); n++); vp \\ Michel Marcus, Aug 26 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|