OFFSET
1,6
FORMULA
G.f.: (1/(1-x)) * Sum_{k>=0} x^(3*2^k).
MAPLE
0, seq(ilog2(2/3*n), n=2..110); # Georg Fischer, Aug 31 2021
MATHEMATICA
Join[{0}, Floor[Log[2, 2/3 Range[2, 110]]]] (* Harvey P. Dale, Mar 01 2012 *)
PROG
(PARI) a(n) = if(n == 1, 0, my(L = logint(n, 2)); L + bittest(n, L-1) - 1) \\ Mikhail Kurkov, Mar 13 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Ralf Stephan, Oct 21 2004
EXTENSIONS
Definition corrected by Georg Fischer, Aug 31 2021
STATUS
approved