A045643 Palindromic and divisible by 8.
0, 8, 88, 232, 272, 424, 464, 616, 656, 696, 808, 848, 888, 2112, 2552, 2992, 4224, 4664, 6336, 6776, 8008, 8448, 8888, 21112, 21312, 21512, 21712, 21912, 23032, 23232, 23432, 23632, 23832, 25152, 25352, 25552, 25752, 25952, 27072, 27272, 27472
Offset: 1
Links
- Paolo Xausa, Table of n, a(n) for n = 1..2000
Crossrefs
Programs
-
Mathematica
palQ[n_]:=Module[{idn=IntegerDigits[n]},idn==Reverse[idn]];Select[ 8Range[0,3500],palQ] (* Harvey P. Dale, Jun 06 2011 *) Select[8*Range[0, 3500],PalindromeQ] (* Harvey P. Dale, Feb 17 2023 *)
Extensions
Edited to include a(1) = 0 by Paolo Xausa, Jul 07 2025