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 A248019 #20 Oct 09 2014 16:49:58
%S A248019 1,12,14,14,25,27,25,14,1,40,1,27,38,40,12,14,1,53,14,1,51,40,27,64,
%T A248019 64,14,66,64,77,77,79,66,79,77,25,38,77,40,1,79,64,53,12,92,90,51,66,
%U A248019 77,25,64,92,77,1,79,64,53,1,103,38,12,14,53,1,77,116,79,116,92,118,118,77,103,66,118,38
%N A248019 Values of x in equation A142508(n)=x^2+13y^2.
%e A248019 a(1)=1 because A142508(1)=53=1^2+13*2^2 (x=1,y=2);
%e A248019 a(2)=12 because A142508(2)=157=12^2+13*1^2 (x=12, y=1).
%t A248019 f[n_] := FindInstance[n == x^2 + 13 y^2 && x > 0 && y > 0, {x, y}, Integers][[1, 1, 2]]; f@# & /@ Select[ Prime@ Range@ 1840, Mod[#, 52] == 1 &] (* _Robert G. Wilson v_, Oct 06 2014 *)
%Y A248019 Cf. A033210, A142508, A248221, A248019(values of y).
%K A248019 nonn
%O A248019 1,2
%A A248019 _Zak Seidov_, Oct 06 2014