OFFSET
1,1
COMMENTS
Mirror numbers have even number of digits with property that left half digits is mirror of right half digits.
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..555
FORMULA
MATHEMATICA
monQ[n_]:=Module[{len=IntegerLength[n], idn=IntegerDigits[n]}, EvenQ[ len] &&Take[idn, len/2]==Reverse[Take[idn, -len/2]]]; Select[Range[11, 9999, 2], monQ] (* Harvey P. Dale, Apr 18 2014 *)
PROG
(PARI) isok(n) = {if (n % 2 == 0, return (0)); d = digits(n); if (#d % 2 == 1, return (0)); for (i=1, #d/2, if (d[i] != d[#d-i+1], return (0)); ); return (1); } \\ Michel Marcus, Nov 05 2013
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Artur Jasinski, Aug 16 2007
STATUS
approved