OFFSET
1,1
COMMENTS
Problem: find an upper estimate for a(n).
LINKS
PROG
(PARI)
A006519(n) = (1<<valuation(n, 2));
A159945(n) = { my(w=hammingweight(n), m = 0, n = (n+n+1)); for(k=1, oo, n = f(n); m = max(m, hammingweight(n)); if(hammingweight(n) <= w, return(m))); }; \\ Antti Karttunen, Sep 22 2018
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Shevelev, Apr 27 2009
EXTENSIONS
More terms from Antti Karttunen, Sep 22 2018
STATUS
approved