A030478 Numbers k such that k^3 has property that all even digits occur together and all odd digits occur together.

0, 1, 2, 3, 4, 8, 10, 11, 12, 13, 15, 17, 19, 20, 22, 24, 26, 31, 33, 34, 35, 39, 40, 42, 46, 52, 54, 58, 59, 71, 72, 80, 82, 91, 92, 93, 95, 100, 104, 110, 120, 124, 131, 135, 137, 150, 152, 169, 172, 173, 174, 175, 179, 200, 202, 211, 220, 240, 258, 259

Offset

1,3

Links

Table of n, a(n) for n=1..60.

Mathematica

Select[Range[0, 300], Length[Split[If[OddQ[#], 1, 0]&/@IntegerDigits[ #^3]]]<3&] (* Harvey P. Dale, Mar 27 2016 *)

Crossrefs

Sequence in context: A175404 A292113 A082224 * A118252 A047456 A279000

Adjacent sequences: A030475 A030476 A030477 * A030479 A030480 A030481

Keyword

nonn,base

Author

Patrick De Geest

Status

approved