cp's OEIS Frontend

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.

A235640 Primes p of the form n^2 + 1234567890 where 1234567890 is the first pandigital number with digits in order.

This page as a plain text file.
%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