login
A324467
Three times the binary weight of n: 3*A000120(n).
5
0, 3, 3, 6, 3, 6, 6, 9, 3, 6, 6, 9, 6, 9, 9, 12, 3, 6, 6, 9, 6, 9, 9, 12, 6, 9, 9, 12, 9, 12, 12, 15, 3, 6, 6, 9, 6, 9, 9, 12, 6, 9, 9, 12, 9, 12, 12, 15, 6, 9, 9, 12, 9, 12, 12, 15, 9, 12, 12, 15, 12, 15, 15, 18, 3, 6, 6, 9, 6, 9, 9, 12, 6, 9, 9, 12, 9, 12, 12, 15, 6, 9, 9, 12
OFFSET
0,2
COMMENTS
Exponent of highest power of 2 that divides multinomial(4*n;n,n,n,n).
LINKS
MAPLE
[seq(padic[ordp](multinomial(4*n, n, n, n, n), 2), n=0..128)];
MATHEMATICA
3 Log[2, Nest[Join[#, 2 #]&, {1}, 8]] (* Vincenzo Librandi, Mar 11 2019 *)
PROG
(Magma) [3*Valuation(Binomial(2*n, n), 2): n in [0..120]]; // Vincenzo Librandi, Mar 11 2019
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Mar 02 2019
STATUS
approved