A324467 Three times the binary weight of n: 3*A000120(n).

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

Author

N. J. A. Sloane, Mar 02 2019

Keywords

• nonn

Comments

Exponent of highest power of 2 that divides multinomial(4*n;n,n,n,n).

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..8191

Crossrefs

Cf. A000120, A006480, A324465, A324466.

Programs

Magma

[3*Valuation(Binomial(2*n,n), 2): n in [0..120]]; // Vincenzo Librandi, Mar 11 2019

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 *)