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 A331136 #15 Apr 23 2024 08:28:27
%S A331136 0,0,1,2,1,2,4,3,2,3,3,6,4,2,7,5,3,6,5,7,7,7,7,7,5,3,10,10,6,8,9,9,9,
%T A331136 7,4,13,9,6,15,7,7,14,11,10,11,9,12,16,9,7,12,13,11,15,14,13,17,12,7,
%U A331136 16,11,8,23,12,9,17,14,16,18,15,15,21,12,10,17,19,16,20,16,11,22,15,14,27,14,11,29,20,12,18
%N A331136 a(n) = Sum_{primes p < n} r_2(n-p)/4, where r_2(n) = A004018(n).
%H A331136 Amiram Eldar, <a href="/A331136/b331136.txt">Table of n, a(n) for n = 1..10000</a>
%H A331136 Yoichi Motohashi, <a href="http://matwbn.icm.edu.pl/ksiazki/aa/aa16/aa1633.pdf">On the distribution of prime numbers which are of the form x^2+y^2+1</a>, Acta Arith. 16 (1969/70), 351-363. MR0288086 (44 #5284).
%t A331136 a[n_] := Sum[SquaresR[2, n - p]/4, {p, Select[Range[n - 1], PrimeQ]}]; Array[a, 100] (* _Amiram Eldar_, Apr 23 2024 *)
%Y A331136 Cf. A004018, A331134.
%K A331136 nonn
%O A331136 1,4
%A A331136 _N. J. A. Sloane_, Jan 11 2020