login
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
OFFSET
1,3
FORMULA
a(n)= sum_{i=1..n} A004257(i). - R. J. Mathar, Sep 08 2008
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
Cf. A092919. - R. J. Mathar, Sep 08 2008
Sequence in context: A276498 A186148 A079511 * A062430 A016040 A003070
KEYWORD
nonn,easy
AUTHOR
Jorge Coveiro, Apr 13 2004
EXTENSIONS
Corrected and extended by Pab Ter (pabrlos(AT)yahoo.com), May 24 2004
Changed from a(3) on by R. J. Mathar, Sep 08 2008
STATUS
approved