A004284 Least positive multiple of n written in base 4 using only 0 and 1.

1, 10, 111, 10, 11, 1110, 111, 100, 1101, 110, 11111, 1110, 1001, 1110, 111111, 100, 101, 11010, 100111, 110, 111, 111110, 1011, 11100, 11011, 10010, 1101, 1110, 10011, 1111110, 11111, 1000, 101001, 1010, 111111, 11010, 1001111

Offset: 1

Author

David W. Wilson

Keywords

• nonn
• base

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..200

Programs

Mathematica

lpm4[n_]:=Module[{k=1},While[Rest[Most[DigitCount[n k,4]]]!={0,0},k++]; FromDigits[IntegerDigits[n k,4]]]; Array[lpm4,40] (* Harvey P. Dale, Dec 22 2012 *)