OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
Primes of the form 10000n + 1729.
MATHEMATICA
Select[Table[ToExpression[ToString[n] <> "1729"], {n, 1000}], PrimeQ] (* T. D. Noe, Aug 15 2011 *)
Select[Prime[Range[120000]], Mod[#, 10000]==1729&] (* Harvey P. Dale, Apr 21 2022 *)
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Kausthub Gudipati, Aug 03 2011
STATUS
approved