|
|
A092757
|
|
Partial sums of round(log_2(n)).
|
|
1
|
|
|
0, 1, 3, 5, 7, 10, 13, 16, 19, 22, 25, 29, 33, 37, 41, 45, 49, 53, 57, 61, 65, 69, 74, 79, 84, 89, 94, 99, 104, 109, 114, 119, 124, 129, 134, 139, 144, 149, 154, 159, 164, 169, 174, 179, 184, 190, 196, 202, 208, 214, 220, 226, 232, 238, 244, 250, 256, 262, 268, 274
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
A004257 := proc(n) option remember ; round(log[2](n)) ; end: A092757 := proc(n) local i ; add( A004257(i), i=1..n) ; end: for n from 1 to 100 do printf("%d, ", A092757(n)) ; od: # R. J. Mathar, Sep 08 2008
|
|
MATHEMATICA
|
Accumulate[Round[Log[2, Range[60]]]] (* Harvey P. Dale, Apr 15 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Corrected and extended by Pab Ter (pabrlos(AT)yahoo.com), May 24 2004
|
|
STATUS
|
approved
|
|
|
|