OFFSET
1,2
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..1000
MATHEMATICA
odedQ[n_]:=Module[{idn3=IntegerDigits[n^3]}, Count[idn3, _?EvenQ]<Count[ idn3, _?OddQ]]; Select[Range[200], odedQ] Harvey P. Dale, May 16 2012
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Mar 18 2005
EXTENSIONS
More terms from Harvey P. Dale, May 16 2012
STATUS
approved