A083977 Smallest palindromic prime containing exactly n 6's.
10601, 16061, 16661, 1660661, 7666667, 166636661, 10666666601, 36666766663, 1766666666671, 3666662666663, 1666666666661, 366666656666663, 11666666666666611, 36666666766666663, 16666666666666661, 3666666665666666663, 1666666666666666661, 166666666636666666661
Offset: 1
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..500
Programs
-
Mathematica
Table[d = 6; 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
More terms from Giovanni Resta, Feb 08 2006