A083981 Smallest palindromic prime containing exactly n zeros.
101, 10301, 1300031, 1003001, 100404001, 100030001, 10060006001, 10000500001, 1000030300001, 1000008000001, 140000000000041, 300000020000003, 10000003030000001, 10000000500000001, 1000000400040000001, 1000000008000000001, 100000000303000000001
Offset: 1
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..500
Programs
-
Mathematica
Table[d = 0; 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