A104912 Numbers k such that the string 9876543210k is prime.

29, 47, 61, 89, 97, 217, 229, 299, 361, 379, 389, 419, 461, 463, 467, 533, 637, 643, 649, 701, 707, 733, 749, 769, 791, 847, 869, 923, 943, 949, 997, 1067, 1103, 1169, 1319, 1327, 1361, 1439, 1451, 1481, 1489, 1493, 1517, 1543, 1549, 1579, 1591, 1643, 1681

Offset: 1

Author

Zak Seidov, Mar 29 2005

Keywords

• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A104800, A104913.

Programs

Magma

[ n: n in [1..1750] | IsPrime(Seqint(Intseq(n) cat [0, 1, 2, 3, 4, 5, 6, 7, 8, 9])) ]; // Vincenzo Librandi, Feb 02 2011

Mathematica

Select[Range[2000],PrimeQ[9876543210*10^IntegerLength[#]+#]&] (* Harvey P. Dale, Jun 22 2024 *)