A111323 Numbers k such that 9 divides prime(1) + ... + prime(k).
20, 24, 26, 30, 40, 42, 52, 74, 78, 80, 88, 113, 119, 127, 163, 177, 179, 187, 205, 207, 242, 248, 254, 258, 260, 262, 268, 270, 280, 282, 284, 288, 297, 311, 331, 357, 368, 372, 380, 394, 398, 400, 410, 412, 416, 428, 436, 443, 457, 466, 468, 470, 474, 490, 496, 505, 509
Offset: 1
Keywords
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Flatten[Position[Accumulate[Prime[Range[509]]]/9,Integer]] (* _Jayanta Basu, May 18 2013 *)
-
PARI
lista(pmax) = {my(s = 0, k = 0); forprime(p = 2, pmax, k++; s += p; if(!(s % 9), print1(k, ", ")));} \\ Amiram Eldar, May 14 2024