OFFSET
0,3
LINKS
FORMULA
EXAMPLE
PROG
(PARI) a(n) = { my (v=1); while (n, my (z=valuation(n, 2), o=valuation(n/2^z+1, 2), r=(2^o-1)*2^z); n-=r; v*=r); v }
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Rémy Sigrist, Aug 05 2022
STATUS
approved