A107109 n-th largest n-digit prime.
7, 89, 983, 9941, 99929, 999931, 9999929, 99999827, 999999739, 9999999769, 99999999763, 999999999697, 9999999999443, 99999999999503, 999999999999353, 9999999999999431, 99999999999999251, 999999999999999463, 9999999999999999343, 99999999999999999199
Offset: 1
Links
- Eduard Roure Perdices, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A069100.
Programs
-
Mathematica
Table[Prime[PrimePi[10^n]-n+1], {n, 13}] a[n_] := NextPrime[10^n, -n]; (* Eduard Roure Perdices, May 09 2021 *)
Formula
a(n) = prime[pi[10^n]-n+1]
Extensions
Extended by Eduard Roure Perdices, May 09 2021
Comments