A278478 a(n) is the 2-adic valuation of A000041(n).
0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 3, 0, 0, 0, 4, 0, 0, 0, 1, 0, 3, 1, 0, 0, 1, 2, 1, 1, 0, 2, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 1, 0, 0, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 2, 0, 1, 2, 2, 0, 0, 2, 0, 1, 1, 6, 0, 0, 0, 5, 0, 0, 0, 2, 3, 0, 0, 2, 1, 2, 0, 0, 0, 2, 0, 1, 0, 0, 0, 0, 0, 0, 0, 3, 0, 11, 1, 3, 0, 2, 1, 0, 1, 0, 0, 4, 0, 2, 7, 1, 0, 2, 2, 0, 0, 3, 2, 0
Offset: 0
Keywords
Links
- Joerg Arndt, Table of n, a(n) for n = 0..10000
Crossrefs
Programs
-
Maple
a:= n-> padic[ordp](combinat[numbpart](n), 2): seq(a(n), n=0..120); # Alois P. Heinz, Nov 23 2016
-
Mathematica
a[n_] := IntegerExponent[PartitionsP[n], 2]; Array[a, 100, 0] (* Amiram Eldar, May 25 2024 *)
-
PARI
{ my( x='x+O('x^100), v=Vec(1/eta(x)) ); vector(#v,n,valuation(v[n],2)) }
Comments