OFFSET
1,2
MATHEMATICA
Table[FromDigits[Flatten[IntegerDigits[n, 2]/.(0->{0, 0})]], {n, 30}] (* Harvey P. Dale, Aug 27 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, May 27 2003
STATUS
approved