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 A138355 #20 Nov 07 2024 09:19:28
%S A138355 11,19,59,131,179,739,971,1531,2411,2819,3259,3491,5051,5939,6571,
%T A138355 6899,8291,9419,9811,10211,15139,16139,16651,19891,22811,24659,25931,
%U A138355 28571,29251,32051,32771,35731,42859,43691,44531,49739,51539,56179,57131
%N A138355 Primes of the form k^2 + 10.
%H A138355 Harvey P. Dale, <a href="/A138355/b138355.txt">Table of n, a(n) for n = 1..1000</a>
%F A138355 a(n) >> n^2 log n. - _Charles R Greathouse IV_, Nov 06 2024
%t A138355 Intersection[Table[n^2+10,{n,0,10^2}],Prime[Range[9*10^3]]] ...or... For[i=10,i<=10,a={};Do[If[PrimeQ[n^2+i],AppendTo[a,n^2+i]],{n,0,100}];Print["n^2+",i,",",a];i++ ]
%t A138355 Select[Range[250]^2+10,PrimeQ] (* _Harvey P. Dale_, Nov 13 2011 *)
%o A138355 (Magma) [ a: n in [0..900] | IsPrime(a) where a is n^2+10]; // _Vincenzo Librandi_, Nov 24 2010
%o A138355 (PARI) list(lim)=my(v=List(),t); forstep(k=1,sqrtint(lim\1-10),2, if(isprime(t=k^2+10), listput(v,t))); Vec(v) \\ _Charles R Greathouse IV_, Nov 06 2024
%K A138355 nonn,easy
%O A138355 1,1
%A A138355 _Vladimir Joseph Stephan Orlovsky_, May 07 2008
%E A138355 More terms from _Vincenzo Librandi_, Apr 28 2010