A222723 Palindromic primes starting with a digit 1.
11, 101, 131, 151, 181, 191, 10301, 10501, 10601, 11311, 11411, 12421, 12721, 12821, 13331, 13831, 13931, 14341, 14741, 15451, 15551, 16061, 16361, 16561, 16661, 17471, 17971, 18181, 18481, 19391, 19891, 19991, 1003001, 1008001, 1022201, 1028201, 1035301, 1043401
Offset: 1
Links
- Jaroslav Krizek, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[Prime[Range[85000]],PalindromeQ[#]&&IntegerDigits[#][[1]]==1&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Mar 14 2018 *)
Comments