OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from Harvey P. Dale)
MATHEMATICA
Flatten[Position[Accumulate[Prime[Range[650]]], _?(Divisible[#, 10]&)]] (* Harvey P. Dale, Sep 25 2011 *)
PROG
(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
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Nov 05 2005
STATUS
approved