OFFSET
1,2
MATHEMATICA
Select[Range[0, 130], Length[Select[IntegerDigits[#], EvenQ]]==1&] (* James C. McMahon, Sep 24 2024 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Zak Seidov, May 11 2006
STATUS
approved