|
|
|
|
2, 5, 5, 17, 28, 41, 58, 77, 50, 129, 16, 197, 119, 281, 164, 127, 440, 501, 568, 71, 356, 791, 46, 321, 530, 1161, 1264, 457, 1480, 1593, 344, 1851, 284, 2127, 2276, 809, 2584, 2747, 1457, 441, 1633, 1149, 3638, 3831, 1007, 4227, 4438
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Conjecture: with the exception of the second term, 2 <= a(n)/A165660(n) < 3.
|
|
LINKS
|
|
|
PROG
|
(PARI) a1(n)=sum(i=1, n, prime(i));
b1(n)=sum(i=1, n, prime(n+1)%prime(i));
a(n)=if(n<0, 0, numerator(a1(n)/b1(n)));
for(n=1, 50, print1(a(n) ", "))
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|