|
| |
| |
|
|
|
1, 4, 8, 10, 16, 19, 27, 31, 40, 45, 57, 63, 77, 84, 99, 107, 125, 134, 154, 164, 185, 196, 220, 232, 257, 270, 297, 311, 341, 356, 388, 404, 437, 454, 489, 507, 545, 564, 603, 623, 665, 686, 730, 752, 797, 820, 868, 892, 941, 966, 1017, 1043, 1097, 1124, 1179
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| seq = if n even then n/2 else n. seq = if n is prime then n+1. Sumseq = Sumseq + seq for n=1, 2, ...
|
|
|
PROG
| (PARI) a(n)={sum(k=1, n, if(isprime(k), k+1, if(k%2, k, k/2)))};
|
|
|
CROSSREFS
| Sequence in context: A028873 A153975 A020169 * A144570 A036311 A020209
Adjacent sequences: A082931 A082932 A082933 * A082935 A082936 A082937
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Cino Hilliard (hillcino368(AT)gmail.com), May 26 2003
|
|
|
EXTENSIONS
| Edited by Charles R Greathouse IV (charles.greathouse(AT)case.edu), Oct 09 2009
|
| |
|
|
