A111324 Numbers k such that 10 divides prime(1) + ... + prime(k).

3, 9, 11, 17, 25, 29, 31, 51, 53, 57, 71, 77, 85, 89, 91, 101, 103, 105, 131, 147, 153, 159, 167, 173, 195, 209, 239, 245, 259, 261, 283, 303, 317, 349, 357, 405, 453, 459, 475, 479, 491, 503, 505, 507, 511, 517, 531, 533, 545, 555, 565, 569, 583, 585, 591, 603, 617, 625

Offset: 1

Author

N. J. A. Sloane, Nov 05 2005

Keywords

• nonn

Links

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

Crossrefs

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

Programs

Mathematica

Flatten[Position[Accumulate[Prime[Range[650]]],?(Divisible[#,10]&)]] (* _Harvey P. Dale, Sep 25 2011 *)

PARI

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