OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..200
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 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved