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 A234812 #12 Apr 19 2014 17:28:07
%S A234812 987654323,987654337,987654347,987654359,987654361,987654377,
%T A234812 987654379,987654383,987654419,987654439,987654443,987654461,
%U A234812 987654463,987654467,987654511,987654539,987654581,987654583,987654601,987654607,987654611,987654673,987654677,987654791
%N A234812 Primes p of the form n + 987654321 where 987654321 is the largest zeroless pandigital number.
%H A234812 K. D. Bajpai, <a href="/A234812/b234812.txt">Table of n, a(n) for n = 1..9777</a>
%e A234812 987654323 is a prime and appears in the sequence because 987654323 = 2 + 987654321.
%e A234812 987654337 is a prime and appears in the sequence because 987654337 = 16 + 987654321.
%p A234812 KD := proc() local a; a:=n+987654321; if isprime(a) then RETURN (a); fi; end: seq(KD(), n=1..1000);
%t A234812 Select[Table[k + 987654321, {k,1,1000}], PrimeQ]
%t A234812 c=0; a=n+987654321; Do[If[PrimeQ[a], c=c+1; Print[c," ",a]], {n,0,200000}] (* b-file *)
%Y A234812 Cf. A000040, A002496, A028871, A050289, A056899, A240587.
%K A234812 nonn,base
%O A234812 1,1
%A A234812 _K. D. Bajpai_, Apr 19 2014