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 A098934 #7 Aug 30 2025 12:13:54
%S A098934 1,2,9,11,16
%N A098934 Numbers n such that the sum of the first n digits of Pi are divisible by n.
%C A098934 For large n, A046974(n-1)/n is very close to 4.5, so is never an integer. - _David Wasserman_, Feb 27 2008
%e A098934 a[1] = 1 since 3 is divisible by 1.
%e A098934 a[2] = 2 since 3 + 1 = 4 is divisible by 2.
%e A098934 a[3] != 3 since 3 + 1 + 4 = 8 is not divisible by 3.
%t A098934 $MaxPrecision = 2500000; pd = RealDigits[N[Pi, 2000000]][[1]]; s = 0; Do[s = s + pd[[n]]; If[ Mod[s, n] == 0, Print[n]], {n, 2000000}] (* _Robert G. Wilson v_, Oct 21 2004 *)
%t A098934 Module[{nn=20,pid},pid=RealDigits[Pi,10,nn][[1]];Select[Range[nn],Mod[Total[Take[pid,#]],#]==0&]] (* _Harvey P. Dale_, Aug 30 2025 *)
%Y A098934 Cf. A046974.
%K A098934 base,easy,fini,full,nonn,changed
%O A098934 1,2
%A A098934 Anne M. Donovan (anned3005(AT)aol.com), Oct 20 2004