OFFSET
1,1
COMMENTS
a(4) = 10091013...9967997363 has 4246 digits. - Amiram Eldar, Jul 20 2025
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..3
EXAMPLE
a(1) = 2357 because its leading digits are the 1-digit primes, viz. 2, 3, 5 and 7 and it is prime.
MATHEMATICA
a[n_] := Module[{d = Flatten[IntegerDigits[Select[Range[10^(n - 1) + 1, 10^n - 1], PrimeQ]]], m = 1, k}, If[PrimeQ[FromDigits[d]], FromDigits[d], While[!PrimeQ[(k = FromDigits[Join[d, IntegerDigits[m]]])], m += 2]; k]]; Array[a, 3] (* Amiram Eldar, Jul 20 2025 *)
CROSSREFS
KEYWORD
base,nonn,bref
AUTHOR
Walter Nissen, Mar 10 2003
EXTENSIONS
The next term is too large to include.
STATUS
approved
