OFFSET
1,1
MATHEMATICA
Select[Range[100], Reverse[IntegerDigits[ # ]] != IntegerDigits[ # ] && Reverse[IntegerDigits[ #, 2]] != IntegerDigits[ #, 2] &]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Tanya Khovanova, Dec 26 2006
STATUS
approved