|
Search: id:A103572
|
|
|
| A103572 |
|
Sum of the primes past 5 modulo 19. |
|
+0 1
|
|
| 7, 18, 31, 48, 48, 52, 62, 74, 92, 95, 100, 109, 124, 126, 130, 140, 154, 170, 173, 180, 193, 195, 201, 209, 221, 235, 253, 266, 283, 287, 293, 309, 327, 332, 343, 358, 360, 368, 378, 379, 382, 389, 398, 400, 414, 432, 433, 438, 449, 462, 466, 476, 492, 495
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
COMMENT
|
For Prime[q[ the sums of the primes > 5 to a prime modulo form a sequence os sequences: a(n,q) = Sum[Mod[Prime[i+3],Prime[q]],{i,1,n}]
|
|
FORMULA
|
a(n) = Sum[Mod[Prime[i+3], 19], {i, 1, n}]
|
|
MATHEMATICA
|
a = Table[Sum[Mod[Prime[i + 3], 19], {i, 1, n}], {n, 1, 200}]
|
|
CROSSREFS
|
Sequence in context: A017473 A061876 A103571 this_sequence A049532 A156619 A033537
Adjacent sequences: A103569 A103570 A103571 this_sequence A103573 A103574 A103575
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Mar 23 2005
|
|
|
Search completed in 0.002 seconds
|