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 A372725 #14 Jul 10 2024 04:58:12
%S A372725 0,2,-1,-1,5,-3,-2,-3,-3,9,-2,-3,-4,-3,-2,-2,17,-3,-4,-1,-2,0,-4,-1,0,
%T A372725 25,-4,-1,-4,-5,-3,-5,-3,-6,-2,2,36,-1,6,-4,-6,-7,1,-3,-4,-2,0,9,-4,
%U A372725 49,-4,-4,-4,-7,-6,-4,-2,-6,-4,-3,1,1,12,-4,65,-2,-5,-5
%N A372725 a(n) = Sum_{k=2..n+2} L(n/prime(k)) where L(n/p) is the Legendre symbol. Row sums of A372726.
%H A372725 Paolo Xausa, <a href="/A372725/b372725.txt">Table of n, a(n) for n = 0..10000</a>
%p A372725 L := (n, k) -> NumberTheory:-LegendreSymbol(n, ithprime(k)):
%p A372725 seq(add(L(n, k), k = 2..n + 2), n = 0..67);
%t A372725 A372725[n_] := Sum[JacobiSymbol[n, Prime[k]], {k, 2, n + 2}];
%t A372725 Array[A372725, 100, 0] (* _Paolo Xausa_, Jul 10 2024 *)
%o A372725 (PARI) a(n) = sum(k=2, n+2, kronecker(n, prime(k))); \\ _Michel Marcus_, May 22 2024
%Y A372725 Cf. A372726, A372724 (fixed points).
%K A372725 sign
%O A372725 0,2
%A A372725 _Peter Luschny_, May 22 2024