OFFSET
0,4
MATHEMATICA
IntegerLength/@NestList[Floor[#/2]Ceiling[#/2]&, 5, 30] (* Harvey P. Dale, Sep 01 2016 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Oct 12 2011
STATUS
approved