login
Moebius function applied to A053422.
0

%I #3 Mar 31 2012 14:39:59

%S -1,1,1,0,0,-1,0,-1,0,0,1,-1,0,1,1,0,0,-1,0,1,0,0,0,1,0,0,1,0,0,1,0,1,

%T 0,0,1,-1,0,1,-1

%N Moebius function applied to A053422.

%p Ankst0 := proc(n); if (n=0) then RETURN(0); fi; (10^n - 1)/9; end; Ankst := proc(n); n*Ankst0(n); end; [seq(mobius(Ankst(i)),i=0..38)];

%Y Cf. A053422.

%K easy,sign

%O 0,1

%A _Jani Melik_, Oct 01 2002