A062287 Palindromic numbers with even digits.
0, 2, 4, 6, 8, 22, 44, 66, 88, 202, 222, 242, 262, 282, 404, 424, 444, 464, 484, 606, 626, 646, 666, 686, 808, 828, 848, 868, 888, 2002, 2222, 2442, 2662, 2882, 4004, 4224, 4444, 4664, 4884, 6006, 6226, 6446, 6666, 6886, 8008, 8228, 8448, 8668
Offset: 1
Examples
246848642 is a palindrome with all even digits hence is a member of this sequence.
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1200
Crossrefs
Subsequence of A002113.
Programs
-
Mathematica
palindromicQ[n_, b_:10] := TrueQ[IntegerDigits[n, b] == Reverse[IntegerDigits[n, b]]]; Select[Range[2, 10^4, 2], palindromicQ[#] && Plus@@Drop[DigitCount[#], {2, 10, 2}] == 0 &] (* Alonso del Arte, Feb 23 2012 *)
Extensions
Corrected and extended by Dean Hickerson, Jul 10 2001
Comments