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 A138375 #13 Apr 21 2025 10:46:14
%S A138375 13,17,29,113,157,269,337,797,1613,1777,1949,2129,3613,4637,5197,6737,
%T A138375 7069,7757,8849,11677,12113,13009,13469,14897,15889,20177,20749,23117,
%U A138375 24977,32413,36877,37649,39217,40013,48413,49297,69709,70769,71837,79537,80669,87629
%N A138375 Primes of the form k^2 + 13.
%H A138375 Vincenzo Librandi, <a href="/A138375/b138375.txt">Table of n, a(n) for n = 1..4500</a>
%F A138375 a(n) = A241749(A113536(n)). - _Elmo R. Oliveira_, Apr 20 2025
%t A138375 Intersection[Table[n^2+13,{n,0,10^2}],Prime[Range[9*10^3]]] ...or... For[i=13,i<=13,a={};Do[If[PrimeQ[n^2+i],AppendTo[a,n^2+i]],{n,0,100}];Print["n^2+",i,",",a];i++ ]
%t A138375 Select[Table[n^2+13,{n,0,7000}],PrimeQ] (* _Vincenzo Librandi_, Nov 30 2011 *)
%o A138375 (Magma) [a: n in [0..700] | IsPrime(a) where a is n^2+13]; // _Vincenzo Librandi_, Nov 30 2011
%Y A138375 Cf. A113536, A241749.
%K A138375 nonn,easy
%O A138375 1,1
%A A138375 _Vladimir Joseph Stephan Orlovsky_, May 07 2008