A111321 Numbers k such that 7 divides prime(1) + ... + prime(k).

5, 8, 13, 22, 33, 40, 47, 50, 56, 63, 72, 84, 86, 104, 106, 110, 115, 126, 128, 139, 148, 150, 154, 157, 160, 180, 184, 186, 188, 200, 209, 220, 228, 230, 232, 236, 238, 240, 244, 253, 270, 274, 300, 302, 305, 322, 324, 331, 339, 354, 367, 371, 384, 415, 417, 420, 428, 433

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)

Mathematica

Position[Accumulate[Prime[Range[500]]], _?(Divisible[#, 7]&)]//Flatten (* Harvey P. Dale, Oct 06 2017 *)

Prog

(PARI) lista(pmax) = {my(s = 0, k = 0); forprime(p = 2, pmax, k++; s += p; if(!(s % 7), print1(k, ", "))); } \\ Amiram Eldar, May 14 2024

Crossrefs

Cf. A007504, A103208, A111318, A111319, A111320, A111322, A111323, A111324, A111325, A111326, A111327.

Sequence in context: A314466 A314467 A314468 * A306943 A020736 A314469

Adjacent sequences: A111318 A111319 A111320 * A111322 A111323 A111324

Keyword

nonn

Author

N. J. A. Sloane, Nov 05 2005

Status

approved