A083980 Smallest palindromic prime containing exactly n 9's.
191, 919, 19991, 1993991, 9199919, 199909991, 199999991, 90999599909, 95999999959, 99999199999, 9599999999959, 199999959999991, 959999999999959, 39999999299999993, 94999999999999949, 99999999299999999, 9299999999999999929, 9999999992999999999
Offset: 1
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..500
Programs
-
Mathematica
Table[d = 9; i = 1; While[ x = IntegerDigits[Prime[i]]; x != Reverse[x] || Count[x, d] != n , i++]; FromDigits[x], {n, 1, 5}] (* Robert Price, Mar 25 2019 *)
Extensions
Corrected and extended by Giovanni Resta, Feb 08 2006