A077508 Largest n-digit prime beginning with n.
29, 397, 4999, 59999, 699967, 7999993, 89999999, 999999937, 1099999997, 11999999983, 129999999949, 1399999999949, 14999999999981, 159999999999997, 1699999999999967, 17999999999999939, 189999999999999941
Offset: 2
Links
- Harvey P. Dale, Table of n, a(n) for n = 2..500
Programs
-
Mathematica
Table[NextPrime[FromDigits[PadRight[{n+1},n-(IntegerLength[n]-1),0]],-1],{n,2,20}] (* Harvey P. Dale, May 28 2015 *)
Extensions
More terms from Francois Jooste (phukraut(AT)hotmail.com), Dec 23 2002
Corrected and extended by Sascha Kurz, Jan 04 2003