OFFSET
1,1
LINKS
K. D. Bajpai, Table of n, a(n) for n = 1..9777
EXAMPLE
987654323 is a prime and appears in the sequence because 987654323 = 2 + 987654321.
987654337 is a prime and appears in the sequence because 987654337 = 16 + 987654321.
MAPLE
KD := proc() local a; a:=n+987654321; if isprime(a) then RETURN (a); fi; end: seq(KD(), n=1..1000);
MATHEMATICA
Select[Table[k + 987654321, {k, 1, 1000}], PrimeQ]
c=0; a=n+987654321; Do[If[PrimeQ[a], c=c+1; Print[c, " ", a]], {n, 0, 200000}] (* b-file *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
K. D. Bajpai, Apr 19 2014
STATUS
approved