This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A111318 #13 May 14 2024 03:59:07 %S A111318 5,9,11,15,17,19,21,25,27,29,31,33,35,37,45,49,71,79,81,83,85,87,91, %T A111318 95,97,99,101,103,105,107,109,111,115,117,119,121,125,129,131,135,155, %U A111318 159,161,163,165,169,171,173,175,177,179,181,183,185,193,195,199,201,203,205 %N A111318 Numbers k such that 4 divides prime(1) + ... + prime(k). %H A111318 Amiram Eldar, <a href="/A111318/b111318.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from Harvey P. Dale) %t A111318 Module[{nn=300,prs},prs=Accumulate[Prime[Range[nn]]];Select[Range[ nn], Divisible[prs[[#]],4]&]] (* _Harvey P. Dale_, May 27 2012 *) %o A111318 (PARI) lista(pmax) = {my(s = 0, k = 0); forprime(p = 2, pmax, k++; s += p; if(!(s % 4), print1(k, ", ")));} \\ _Amiram Eldar_, May 14 2024 %Y A111318 Cf. A007504, A103208, A111319, A111320, A111321, A111322, A111323, A111324, A111325, A111326, A111327. %K A111318 nonn %O A111318 1,1 %A A111318 _N. J. A. Sloane_, Nov 05 2005