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 A235640 #13 Apr 23 2014 16:06:55 %S A235640 1234567891,1234568059,1234569571,1234574779,1234576171,1234579771, %T A235640 1234592539,1234595779,1234609099,1234625011,1234625971,1234634971, %U A235640 1234647979,1234669651,1234692499,1234743451,1234753651,1234769491,1234780411,1234900819,1234948579 %N A235640 Primes p of the form n^2 + 1234567890 where 1234567890 is the first pandigital number with digits in order. %H A235640 K. D. Bajpai, <a href="/A235640/b235640.txt">Table of n, a(n) for n = 1..6694</a> %e A235640 1234567891 is a prime and appears in the sequence because 1234567891 = 1^2 + 1234567890. %e A235640 1234568059 is a prime and appears in the sequence because 1234568059 = 13^2 + 1234567890. %p A235640 KD := proc() local a; a:=n^2+1234567890; if isprime(a) then RETURN (a); fi; end: seq(KD(), n=1..2000); %t A235640 Select[Table[k^2+1234567890,{k,1,2000}],PrimeQ] %t A235640 c=0; a=n^2+1234567890; Do[If[PrimeQ[a],c=c+1; Print[c," ",a]], {n,0,200000}] (*b-file*) %Y A235640 Cf. A000040, A002496, A028871, A050289, A056899, A240587, A234812. %K A235640 nonn %O A235640 1,1 %A A235640 _K. D. Bajpai_, Apr 20 2014