A029951 Even palindromes.
0, 2, 4, 6, 8, 22, 44, 66, 88, 202, 212, 222, 232, 242, 252, 262, 272, 282, 292, 404, 414, 424, 434, 444, 454, 464, 474, 484, 494, 606, 616, 626, 636, 646, 656, 666, 676, 686, 696, 808, 818, 828, 838, 848, 858, 868, 878, 888, 898, 2002, 2112, 2222
Offset: 1
Links
- John Cerkan, Table of n, a(n) for n = 1..10000
- Patrick De Geest, World!Of Numbers
Crossrefs
Programs
-
Mathematica
palindromicQ[n_, b_:10] := TrueQ[IntegerDigits[n, b] == Reverse[IntegerDigits[n, b]]]; Select[Range[2, 10^4, 2], palindromicQ[#] &] (* Alonso del Arte, Feb 23 2012 *) Select[Range[0, 2222, 2], PalindromeQ] (* Michael De Vlieger, May 12 2017, Version 10.3 *)