A103572 Sum of the (primes > 5 modulo 19).

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

Offset

1,1

Comments

Case q=19 of a(n,q) = Sum_{i=1..n} (prime(i+3) mod q).

Links

Table of n, a(n) for n=1..54.

Formula

a(n+1) - a(n) = A033633(n+4).

Mathematica

a = Table[Sum[Mod[Prime[i + 3], 19], {i, 1, n}], {n, 1, 200}]

Prog

(PARI) my(s=0); forprime(p=7, 270, my(k=s+=p%19); print1(k", ")) \\ Bruce Nye, May 05 2026

Crossrefs

Cf. A033633, A103566-A103571.

Sequence in context: A341008 A103571 A365414 * A049532 A156619 A033537

Adjacent sequences: A103569 A103570 A103571 * A103573 A103574 A103575

Keyword

nonn,easy,less

Author

Roger L. Bagula, Mar 23 2005

Status

approved