|
|
A348651
|
|
Number of ones in the binary expansion of (n!)!.
|
|
1
|
|
|
1, 1, 1, 4, 29, 293, 2566, 24844, 259437, 2908263, 35102629, 455204360, 6321171774
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,4
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
a(3) = 4 because (3!)! = 6! = 720 = 1011010000_2 which has 4 ones.
|
|
MAPLE
|
a:= n-> add(i, i=Bits[Split](n!!)):
seq(a(n), n=0..10);
|
|
MATHEMATICA
|
a[n_] := DigitCount[(n!)!, 2, 1]; Array[a, 10, 0] (* Amiram Eldar, Oct 29 2021 *)
|
|
PROG
|
(Python)
from gmpy2 import fac, popcount
(PARI) a(n) = hammingweight((n!)!); \\ Michel Marcus, Oct 29 2021
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|