|
|
A043040
|
|
Numbers that are palindromic and divisible by 5.
|
|
4
|
|
|
5, 55, 505, 515, 525, 535, 545, 555, 565, 575, 585, 595, 5005, 5115, 5225, 5335, 5445, 5555, 5665, 5775, 5885, 5995, 50005, 50105, 50205, 50305, 50405, 50505, 50605, 50705, 50805, 50905, 51015, 51115, 51215, 51315, 51415, 51515, 51615, 51715, 51815, 51915
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Or, numbers that are palindromic and begin with 5.
|
|
LINKS
|
|
|
MATHEMATICA
|
palQ[n_Integer, base_Integer] := Module[{idn = IntegerDigits[n, base]}, idn == Reverse[idn]]; Select[Range[0, 100000], IntegerDigits[#][[1]] == 5 && palQ[#, 10] &] (* T. D. Noe, Mar 12 2013 *)
Select[5*Range[11000], IntegerDigits[#]==Reverse[IntegerDigits[#]]&] (* Harvey P. Dale, Nov 29 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|