OFFSET
0,2
EXAMPLE
As an example: 236721 because 2 is even, 3 is odd, 6 is even, 7 is odd, 2 is even and 1 is odd. Again: 58 (5 odd and 8 even) is in the sequence but not 59 (both are odd).
MATHEMATICA
Select[Range[300], Length[Split[Mod[ #, 2] & /@ (id = IntegerDigits[ # ])]] == Length[id] && Times @@ id > 0 &] (* Ray Chandler, Nov 01 2005 *)
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Paolo P. Lava and Giorgio Balzarotti, Oct 27 2005
EXTENSIONS
Extended by Ray Chandler, Nov 01 2005
STATUS
approved