OFFSET
1,3
LINKS
Andrey Zabolotskiy, Table of n, a(n) for n = 1..1018
EXAMPLE
1/5 = 0.00110011001100... in binary, so a(5) = 1100.
MATHEMATICA
f[n_] := If[IntegerQ@ Log2@ n, 0, FromDigits[ RealDigits[1/n, 2][[1, 1]]]]; Array[f, 27] (* Robert G. Wilson v, Sep 01 2015 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Bryan Jacobs (bryanjj(AT)gmail.com), Feb 25 2005
STATUS
approved