A105234 Central column of a Moebius-binomial triangle.
1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1
Offset: 0
Links
Programs
-
Mathematica
a[n_]:=Binomial[Abs[MoebiusMu[2n]],Abs[MoebiusMu[n]]];Table[a[n],{n,0,100}] (* James C. McMahon, Jan 22 2024 *)
-
PARI
A105234(n) = if(n<2,1,binomial(abs(moebius(2*n)), abs(moebius(n)))); \\ Antti Karttunen, Sep 13 2017
Formula
a(n) = binomial(abs(mu(2n)), abs(mu(n))).
Comments