OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
EXAMPLE
log(2) = [0], [1, 0, 1, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 0, 1, ...
MATHEMATICA
Position[RealDigits[Log[2], 2, 200][[1]], 1]//Flatten (* Harvey P. Dale, Aug 29 2016 *)
PROG
(PARI) v=binary(log(2))[2]; for(i=1, #v, if(v[i], print1(i, ", ")));
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Ralf Stephan, Mar 30 2014
STATUS
approved