The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A168395 Moebius function of odd interprimes (A072569). 0

%I

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

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

%U 1,-1,-1,1,1,0,-1,-1,1,0,1,0,1,-1,1,0,1,0,0,0,-1,0,1,0,-1,-1,1,1,1,-1,1,1,0

%N Moebius function of odd interprimes (A072569).

%p ts_fip_lih:=proc(n) local i,an,tren: an:=[ ]: for i from 2 to n do tren:=(ithprime(i)+ithprime(i+1))/2: if (tren mod 2 <> 0) then # an:=[ op(an), tren ]: an:=[ op(an), numtheory[mobius](tren) ]: fi: od: RETURN(an) end: ts_fip_lih(2000);

%Y Cf. A008683.

%K sign

%O 1,1

%A _Jani Melik_, Nov 24 2009

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified June 12 16:55 EDT 2021. Contains 344959 sequences. (Running on oeis4.)