|
Search: id:A118483
|
|
|
| A118483 |
|
Partial sums of primes that are not Chen primes (starting with 1). |
|
+0 1
|
|
| 1, 44, 105, 178, 257, 354, 457, 608, 771, 944, 1137, 1360, 1589, 1830, 2101, 2378, 2661, 2974, 3305, 3654, 4021, 4394, 4777, 5174, 5595, 6028, 6467, 6924, 7387, 7910, 8457, 9050, 9651, 10258, 10871, 11490, 12133, 12794, 13467, 14158, 14867, 15594
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
MAPLE
|
ischenprime:=proc(n); if (isprime(n) = 'true') then if (isprime(n+2) = 'true' or numtheory[bigomega](n+2) = 2) then RETURN('true') else RETURN('false') fi fi end: ts_partsum_notchenprime:=proc(n) local i, ans, tren; ans:=1: tren:=1: for i from 1 to n do if (ischenprime(i)='false') then tren := tren+i: ans:=[op(ans), tren]: fi od; RETURN(ans) end: ts_partsum_notchenprime(1000);
|
|
CROSSREFS
|
Cf. A014284, A102540, A109611.
Sequence in context: A129289 A039527 A050944 this_sequence A044231 A044612 A036198
Adjacent sequences: A118480 A118481 A118482 this_sequence A118484 A118485 A118486
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jani Melik (jani_melik(AT)hotmail.com), May 05 2006
|
|
|
Search completed in 0.002 seconds
|