OFFSET
1,1
REFERENCES
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
T. D. Noe, Table of n, a(n) for n = 1..500
MAPLE
A000801 := proc(n) local k; sum(floor(2^k/k), k=1..n); end;
MATHEMATICA
Table[Sum[Floor[2^k/k], {k, n}], {n, 30}] (* T. D. Noe, Jun 20 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved