|
| |
|
|
A071425
|
|
Total number of 1-s in binary representation of all factorials from 1 to n.
|
|
0
|
|
|
|
1, 2, 4, 6, 10, 14, 20, 26, 32, 43, 50, 62, 74, 86, 104, 122, 144, 167, 184, 206, 231, 259, 290, 319, 349, 384, 422, 464, 504, 552, 594, 636, 682, 733, 789, 840, 898, 957, 1021, 1084, 1150, 1214, 1285, 1359, 1429, 1506, 1587, 1676, 1763, 1852, 1942, 2030, 2124
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Table of n, a(n) for n=1..53.
|
|
|
MATHEMATICA
|
s=0; Do[s=s+Apply[Plus, IntegerDigits[n!, 2]]; Print[s], {n, 1, 128}]
|
|
|
CROSSREFS
|
Cf. A000142, A000788.
Sequence in context: A167379 A213476 A094589 * A115065 A008804 A001307
Adjacent sequences: A071422 A071423 A071424 * A071426 A071427 A071428
|
|
|
KEYWORD
|
base,easy,nonn
|
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), May 27 2002
|
|
|
STATUS
|
approved
|
| |
|
|