|
| |
| |
|
|
|
0, 1, 4, 8, 15, 23, 33, 44, 59, 75, 93, 112, 134, 157, 182, 208, 239, 271, 305, 340, 378, 417, 458, 500, 546, 593, 642, 692, 745, 799, 855, 912, 975, 1039, 1105, 1172, 1242, 1313, 1386, 1460, 1538, 1617, 1698, 1780, 1865, 1951, 2039, 2128, 2222, 2317, 2414
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
FORMULA
| G.f.: (1/(1-x))*Sum{k=0..infinity, x^(2^k)/((1-x)*(1-x^(2^k)))}; a(n)=sum{k=1..n, sum{j=0..n, floor(k/2^j)}};
|
|
|
MATHEMATICA
| Accumulate[Table[2n-Count[IntegerDigits[2 n, 2], 1], {n, 0, 70}]] (* From Harvey P. Dale, Oct 22 2011 *)
|
|
|
CROSSREFS
| Sequence in context: A024916 A102216 A001182 * A126255 A194804 A169953
Adjacent sequences: A122244 A122245 A122246 * A122248 A122249 A122250
|
|
|
KEYWORD
| easy,nonn
|
|
|
AUTHOR
| Paul Barry (pbarry(AT)wit.ie), Aug 27 2006
|
| |
|
|
